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La nuova rubrica / segreti dei personal contiene 

informazioni, trucchi, caratteristiche, utility dei vari 8 
personal. Questo mese cominciamo con ZX81, 

TRS-80, VIC e PET/CBM 


Vi interessa un algoritmo per generare labirinti? 

In questo articolo trovate quello che fa per voi, con un 
esempio di applicazioni su PET/CBM e le spiegazioni 607 
per l’implementazione su altri computer 
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IL BASIC 


PROGRAMMI PRATICI IN BASIC 
di Lon POOLE 


Il libro è una raccolta di programmi di tipo 
finanziario, matematico, scientifico e di 
decisioni manageriali. Ogni programma, 
orientato alla risoluzione di un problema 
pratico, è presentato con una breve 
descrizione iniziale. un campione di 
esecuzione, il listing BASIC. nonchè. per 
molti, una sezione in cui sono raccolte 
possibili variazioni per rendere il 
programma stesso piùrispondente alle 
necessità personali. | programmi sono stati 
scritti in un BASIC generale, il che li rende, 
per la maggior parte, direttamente 
utilizzabili, senza alcun cambiamento, su 
molti microcomputer, e sono stati provati 
usando varie versioni di BASIC. 

SOMMARIO 

Reddito medio - Valore corrente di un buono del 
tesoro - Calcolo dell'interesse di obbligazioni - 
Interesse continuo composto - Regola 
dell'interesse 78 re netto presente di un 
investiment sso di cassa non uniforme - 
Affitto/decisione di acquisto - Analisi degli 
investime! 

deprezzamento 
intema di ritorno - Ammin 
Analisi di quote di stat 
Partecipazione ai profitt ribuenti - 
Controllo dei libri*- Bilan - Metodo 
critico Path (C rt - Algoritmo di trasporto - 
Teoria delle si di Markov - Analisi non 
lineare di nalisi con la metrice dei 
vantaggi - Decisi loves - Quantità 
‘economica di un ordine - Quantità economica di 
una produzione - della stima statistica. 
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le di quote - Quota 
razione finanziaria 


INTRODUZIONE AL BASIC 


Si tratta di un vero e proprio corso di BASIC. 
Le caratteristiche che lo hanno fatto 
scegliere. per questi mini elaboratori sono 
di essere facile da apprendere ed utilizzare 
nonchè di essere un linguaggio interattivo. 
Se ci sono errori, questi possono subito 
essere rilevati in maniera tale da poterli 
coreggere. 

Facile da leggere e imparare, che con 
numerosi esempi “testa” subito il reale 
apprendimento raggiunto dal lettore 

Un testo che si rivolge ai principianti. Infatti 
in maniera progressiva e pedagogica, 
senza alcuna necessità di formazione di 
base sulle tecniche di informatica, illustra, 
spiega, esemplifica tutti gli aspetti dei 
linguaggi attualmente disponibili su 
differenti sistemi, che vanno dal 
microcalcolatore ci sistemi time-sharing chi 
ha già acquisito esperienza in altri 
linguaggi, invece potrà saltare la parte 
preliminare, di introduzione alla materia, 
per entrare subito nel vivo del BASIC. 

La base dell'informatica: le generalità del 
linguaggio BASIC; le istruzioni; il trattamento 
degli elenchi: tabelle, file. sottoprogrammi; i 
procedimenti grafici e le possibilità offerte: 
le istruzioni specifiche di alcuni sistemi 
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PROGRAMMARE IN BASIC 
di Michel PLOUIN 


Come tutte “le lingue viventi”, il BASIC 
viene applicato in realtà a questa o a 
quella macchina sotto forma di dialetti più 
o meno particolari. Questo libro si sforza di 
descrivere in modo metodico il BASIC delle 
tre macchine più diffuse sul mercato 
mondiale: Apple, PET, TRS 80, e, 
naturalmente, i loro derivati. 

Ciò faciliterà anche la conversione dj 
programmi scritti, da un determinato 
personal computer agli altri. Numerosi 
esempi (programmi verificati attentamente) 
chiariscono i concetti proposti e sono 
immediatamente riutilizzabili da i possessori 
dei sopracitati personal. 

SOMMARIO 

Introduzione - Le variabili - Funzioni - Logica di 
svolgimento di un programma - Dialogo con la 
macchina - Funzioni speciali - Effetti grafici ed 
alri - Preparazione dei programmi codice ASCII e 
caratteri speciali - Calcolo bihario ed 
esadecimale - Esempi di programmi 
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COME PROGRAMMARE 
di Jean Ciaudo BARBANCE 


Il libro insegna a chi programma come 
deve enunciare e definire correttamente 
l'idea iniziale, come analizzaria e 
trasformarla. e come verificare la 
correttezza della stessa sino a giungere alla 
stesura di un programma ben 
‘documentato, leggibile e facilmente 
modificabile. Vengono esplicitate tutte le 
altre fasi intermedie del lavoro: le vie. 
alternative che si presentano e tra cui 
scegliere, le eventuali estensioni, le prove e 
le verifiche che occorre fare per ottenere 
un programma conforme a quanto ci si 
era proposti. Poichè era necessario 
appoggiarsi a un linguaggio, si è scelto i 
BASIC per la sua larga diffusione. | concetti 
esposti, comunque sono utilizzabili con 
qualsiasi ciltro linguaggio. | programmi 
presentati sono stati tutti provati e girano 
su computer da 4 a 64K di memoria. 
SOMMARIO 

Realizzazione dei programmi; le fasi - La 
definizione degli obiettivi - L'analisi - La codifica e 
{a messa a punto del programma - Presentazione 
degli esempi - Rappresentazione di un numero 
decimale mediante una stringa di caratteri 
alfabetici - ll gioco del 421 - La contabilità 


personale. 
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Per ordinare il volume utilizzare l'apposito tagliando inserito in fondo alla rivista. 


Editoriale annui 


Le novità di questo mese 


Mauro Boscarol 


olte novità in questo numero. Perso- 
Meeinene. ritengo che la più interes- 

sante sia la nuova rubrica / segreti dei 
personal. Si tratta di un grosso spazio, il cui te- 
ma generale è appunto “i segreti del personal”, 
cioè i trucchi, gli accorgimenti, per usare più a 
fondo il vostro computer, e le funzioni nasco- 
ste, le caratteristiche più “intime” delle vostre 
macchine, quello che il manuale non dice. Lo 
spazio dei “segreti” è suddiviso in sottorubri- 
che: in questo numero ci sono quelle del PET/ 
CBM, TRS-80 mod. I, VIC, ZX81. Nei prossi- 
mi numeri ancora questi e molti di più. Dipen- 
de anche da voi. 

Un'altra novità: la posta. Tutte le riviste han- 
no una rubrica di posta, noi non potevamo far- 
ne a meno. Ma la nostra posta non è concentra- 
ta nella rubrica: è anche sparsa per il giornale. 
Se ci scrivete indicando un miglioramento per 
una routine pubblicata nella Raccolta di routine 
Basic troverete là il vostro suggerimento. Se ci 
scrivete per parlare di qualche “gioco 
informatico”, è in questa rubrica che troverete 
le vostre richieste o i vostri suggerimenti. 

Un'ultima novità è il servizio programma: 
per i programmi più lunghi e complessi, questo 
servizio vi permette di richiedere un disco già 
registrato direttamente a casa vostra, pagando 
in contrassegno. Per maggiori dettagli consulta- 
te la sezione programmi. 

Per il resto, nulla di nuovo, ossia articoli e 
programmi. Ma articoli interessanti, come Co- 
municazione da PET a PET attraverso la “User 
Port” che vi insegna come collegare due PET 
tra di loro in modo che si scambino informazio- 
ni. E poi La compressione dei testi tratta il pro- 
blema sempre attuale di ridurre l'occupazione 
su disco dei file. Ricerca su alberi, in questa se- 
conda parte affronta le tecniche di tipo euristi- 
co. Generatore di labirinti descrive un algoritmo 
che produce labirinti casuali di ogni formato di- 
rettamente sul video. 

E programmi interessanti. La carta del cielo è 
il presupposto scientifico dell’astrologia. Mi 
spiego meglio. La redazione di un oroscopo av- 
viene in due passi. Dapprima si determina la 
posizione dei pianeti, del sole e della luna al 
momento della nascita dell’individuo. Questa 


prima fase, cioè il tracciamento della “carta del 
cielo” in una certa data, si realizza mediante le 
tecniche dell’astronomia, e quindi la sua scien- 
tificità è fuori dubbio. Si tratta di calcoli com- 
plicati ma ben determinati: li potere eseguire 
da soli, e con l’esattezza dei minuti secondi, 
con il programma riportato in fondo alla rivista. 
Il secondo passo, l’interpretazione della carta 
del cielo, è a questo punto lasciata a voi: non si 
tratta, fino ad oggi almeno, di certezza scientifi- 
ca, ed ognuno ha le sue tecniche personali. 

Per il TRS-80 c’è poi il Backgammon scritto 
da Adam Scott, l'inventore delle Adventure, i 
programmi che vi pongono al centro di una 
azione di cui siete protagonista (sono molto dif- 
ficili da tradurre ma ci stiamo provando). Qui 
Adam Scott ha temporaneamente abbandonato 
le Adventure per scrivere questo Backgammon, 
con il quale potete sfidare il vostro calcolatore. 

E altri programmi per VIC, Atari, ZX81, 
Atom. 

Buona lettura. 


Nel prossimo numero: 


Tecniche di ricerca 
Grafica tridimensionale 


con l’ Apple 


Interi in precisione multipla 


Programmi per VIC, 
ZX81, Atari, PET/CBM, 
Apple 


I segreti dei personal 


sims 0 


La programmazione dei giochi di movimento 


Enrico Ferreguti 


I programmi di.giochi, si sa, sono quelli che più ven- 
gono usati dagli utenti di home computer e più specifi- 
catamente dello ZX 81. E mia volontà non toccare 
l’argomento del linguaggio macchina poiché credo che 
gli utilizzatori di queste macchine, almeno la maggior 
parte, non lo conoscano molto bene. Lascio fuori an- 
che i possessori di ZX 80 invitandoli a leggermi ugual- 
mente (diverse case di hardware commercializzano ag- 
geggi in grado di attivare lo slow anche su ZX 80 nuo- 
va ROM, basta cercare un po”...). 

Il principio generale della programmazione di giochi 
di movimento si basa sul cancellare la figura da sposta- 
re e ridisegnarla in un’altra posizione, calcolata secon- 
do parametri influenzati dall’utente. 

Un gioco, per essere tale, deve essere interattivo, 
cioè deve stabilirsi un legame fisico tra giocatore e cal- 
colatore. Questo deve avvenire tramite l’unico organo 
di input di cui è in possesso il Sinclair: la tastiera. 

Se nei giochi tradizionali è lasciata la possibilità di 
pensare fermando il calcolatore con degli input, que- 
sto non è possibile con un gioco di movimento i cui 
principali ingredienti sono prontezza di riflessi ed in- 
tuizione. Eliminata l’INPUT l’istruzione che fa per noi 
è la funzione INKEY$, che legge da programma il ta- 
sto premuto sulla tastiera in quel momento, senza fer- 
marsi. L’uso è molto semplice, p.es.: 


10 IF INKEY$“” THEN GOTO 10 
20 LET A$=INKEY$ 
30 PRINT “HAI PREMUTO IL TASTO”; A$ 


Questo semplice programma stampa sul video il ca- 
rattere premuto. La linea 10 si ripete finché non si 
preme un tasto (finché INKEY$ sarà diverso dalla 
stringa nulla); la linea 20 legge il tasto premuto (che 
sarà anche quello che ha fatto uscire lo ZX dal ciclo in 
10) ed il gioco è fatto. 


La seconda considerazione che si deve fare è nell’u- 
so di CLS; mentre nei programmi per la versione non 
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espansa l’uso di CLS sarà frequentissimo, poiché per- 
mette di calcellare la figura e di riscriverla velocemen- 
te in un’altra posizione, nei programmi da 16 K il suo 
uso rischierà di essere un pericoloso ostacolo alla ste- 
sura di programmi veloci di grafica animata. La causa 
è presto spiegata: lo schermo vuoto nello ZX 81 1 K è 
formato da 24 caratteri NEWLINE in quanto non è 
mappato (si gonfia o si rimpicciolisce a seconda di 
quello che stampiamo), quindi il calcolatore quando 
incontra quest’istruzione si limita a contrarre lo scher- 
mo e a porre 24 NEWLINE e quindi l’operazione si 
rivela sufficientemente veloce. Con l’espansione con- 
nessa invece, lo schermo è mappato ed occupa perma- 
nentemente 792 byte. L'operazione da compiere divie- 
ne inaccettabile in slow mode perché il calcolatore è 
costretto a percorrere tutto il display file ponendo ad 
ogni locazione (792!) uno spazio bianco. 


Passiamo ora ad analizzare il programma 1. 


5 SGN 

16 LET H=19 

11 LET S=®% 

12 LET A=I (RND 22 

15 LET Fi&= 8a" —. 

17 LET C=INT ‘QND»153 

20 IF INKEY&="1" THEN LET H=tH- 
{H>©9) 
a INKEV $="0" THEN LET H=H+ 
É INMEV$="S" THEN PRINT AT 
H ci 

IMKENVE= VOS AND Raf THEN 


LET fi=sf+tINT_ (RND*5} -1 
A=A+e 158 cD5 - 194x355 


GOT 


B=H THEN 


soTo 


asa 


Programma 1. Defender 


Siamo alla guida di un’astronave e non dobbiamo 
lasciar passare nessun alieno (rappresentato da un 
“>”). Ogni volta che ne lasciamo passare uno il nostro 
punteggio subisce un decremento di 20 punti (se arriva 
a —20 il gioco finisce). Possiamo dividere il program- 
ma in 4 diverse sezioni. 


1. la sezione di guida da 20 a 29: 
Vediamo che il programma decrementa (fa anda- 
re su l’astronave) la variabile H (altezza dell’a- 
stronave) nel caso sia premuto il tasto 1 e la in- 
crementa quando si preme Q. Si nota inoltre un 
esempio di logica relazionale che costringe l’a- 
stronave nella fascia da 0 a 21: LET H=H—(H 
20), LET H=H+(H 21). Se si preme lo 0 prima 
si ha la stampa della raffica e in riga 27 si ha il 
salto alla subroutine che aggiornerà il punteggio 
nel caso sia premuto 0 e che l’astronave sia sulla 
stessa linea dell’avversario. Si procede poi nelle 
righe 28 e 29 al movimento in su o in giù in modo 
RND controllato dai soliti operatori relazionali 
(riflettete un attimo sulla riga 29 e cercate di ca- 
pire, ogni vostra deduzione sarà senz’altro più 
chiara di ogni mia spiegazione). 

2. sezione di stampa (righe 30, 40) 
In riga 30 c’è il CLS che cancella le figure dell’a- 
lieno e dell’astronave che vengono ristampate se- 
condo i nuovi parametri. 

3. sezione di controllo (righe 50, 65) 
Serve a comandare l’avanzata dell’alieno e a ve- 
dere se l’alieno ha colpito l’astonave. 

4. sezione di utilità 
Comprende la parte di inizializzazione (5, 17) e 
le varie routine di asservimento: quella per ag- 
giornare il punteggio e per distruggere l’alieno e 
quella di fine gioco. 


Il programma gira su 1 K di RAM ed è sconsigliabi- 
le usarlo con l'espansione da 16 K; per l’uso con que- 
st’ultima bisognerà sostituire il CLS con opportuni ma- 
scheramenti di spazi. Vediamo subito la tecnica di vi- 
sualizzazione con l’espansione da 16 K. 

Se volessimo disegnare una figura più complessa di 
quella vista prima con “Defender”, il programma ne- 
cessariamente rallenterebbe. E per questo che si ricor- 
re alla funzione TAB che si rivela in questi casi molto 
versatile. Queste 3 linee di programma fanno correre 
una freccia lungo lo schermo: 


100 FOR J=0 TO 27 i 
110 PRINT AT 15,5; “DODGO”; TAB J; 
“Aes”; TAB J; “DOO” 


120 NEXT J 


Il disegno è difficile da riconoscere, ma questo dia- 
gramma potrà aiutare. 


PRINT AT 15,J | 
TAB J ll LII 
TAB J GM 


Possiamo individuare 2 importanti punti: 3 
1. La tecnica dell’uso di TAB per stampare imme- 
diatamente sotto l’ultimo disegno, alla posizione 
xo 


2. L’uso di spazi all’inizio dei tre gruppi di caratteri 
che formano la freccia; questi cancellano imme- 
diatamente i resti della precedente freccia quan- 
do viene mosso il disegno lungo lo schermo. 


GaRAa DELLE TRST 


Programma 2. Gara delle tariarughe 


I segreti dei personal 


Esaminiamo ora il programma 2 che riprende la tec- 
nica vista prima e ne introduce un’altra. Il programma 
muove 5 tartarughe lungo lo schermo in modo casuale 
(1K). 


Tralasciamo la parte di gestione e soffermiamoci 
sulla riga 45 dove sono concentrati tutti i trucchi. In- 
nanzitutto notiamo le TAB con cui si disegna la figura, 
poi si nota la funzione CHR$ per stampare il numero 
della tartaruga in inverso. Al di là del semplice signifi- 
cato grafico, questo trucchetto permette di stampare 
sullo schermo di una cifra a velocità molto elevata. 


Forse ora vorrete provare a fare delle altre anima- 
zioni, forse l’articolo vi ha anche suggerito qualche 
idea; intanto provate il programma 3, scoprite cosa fa 
e giocate (è da 1 K ed è facilissimo). 


5 FI 
16 
Li De 
12 
15 (RND*207 
za E (RNDAZO) 
25 LET K=END-.5 
27 IF KeNGOT PÌ THEH LET Bg=e" 
28 PI THEN LET B&=“;" 
sto] x* 
10 
50 DINT E:A&:6T 21.T 
° s5 NOT PI.NOT PI:(B$ 
57 ig so, 
T E+S 
e0 


[0] 


Programma 3. 
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Tandy 


Radio Shack 


Per chi ha il modello 1 


Renzo Gabrielli 


Qualche volta può essere necessario usare la stam- 
pante al posto del video per visualizzare dati o altro, 
che altrimenti andrebbero persi spegnendo il compu- 
ter. Per esempio, se volete avere una copia di dimo- 
strazione del funzionamento di un programma, dovre- 
ste cambiare tutte le istruzioni PRINT in LPRINT. 
Ecco il consiglio che fornisce la casa costruttrice del 
TRS-80. 


Per trasformare tutte le 
LPRINT, battete: 


istruzioni PRINT in 


POKE 16414, 141 
POKE 16415,5 


Per riconvertire le istruzioni, scrivete: 


POKE 16414,88 
POKE 16415,4 


Le istruzioni precedenti possono comparire nel vo- 
stro programma, ma possono essere impartite anche 
da tastiera. Un’altra applicazione: può servire per far 
girare programmi pronti che prevedono l’uso delle 
stampante, quando questa manca. Le prossime istru- 
zioni trasformano tutte le LPRINT in PRINT: 


POKE 16422,88 
POKE 16423,4 


Per invertire il procedimento, usate: 


POKE 16422,141 
POKE 16423,5 


Il programma non viene modificato, ma il computer 
interpreterà le istruzioni in modo differente a seconda 
dei valori presenti in queste quattro locazioni di me- 
moria. 


Lo colleghi al televisore 
iochi, impari. 


e inventi, 
Con solo 


99.00 


diventi uno che di computer 


se ne intende. 


ALESSANDRIA Via Savonarola, 13 
ANCONA Via De Gasperi, 40 
AREZZO Via F. lippi, 13 

BARI Via Devitofrancesco, 4/2A 
BARI Via Capruzzi, 192 
BASSANO DEL GRAPPA 

Via Jacopo Da Ponte, 51 
BERGAMO Via F. D'Assisi, 5 
BOLOGNA Via Brugnoli, 1 
CAGLIARI via Zagabria, 47 


CAMPOBASSO Via Mons. Il Bologna, 10 


CESANO MADERNO Vic Ferrini, 6 


lire + 1va 


CUNEO C.so Nizza, 16 


FAVRIA CANAVESE c so Matteotti, 13 


FIRENZE Via G. Milanesi, 28/30 


FOGGIA Via Morchianò, 1 


FORLÌ P.zza Melozzo Degli Ambrogi, 1 


GALLARATE Via A. Da Brescia, 2 


GENOVA Via Domenico Fiasella, 5I/R 
GENOVA-SESTRI Via Chiaravagna, 10/R 


IMPERIA Via Delbecchi, 32 
L'AQUILA Via Stroda, 85 
LECCO Vio LL Da Vinci, 7 
LIVORNO Via San Simone, 31 


CINISELLO BALSAMO vie Matteotti, 66 MESSINA via Del Vespro, 71 
MILANO Galleria Manzoni, 40 


COMO Via LL Sacco, 3 
COSENZA Via Dei Mille, 86 


MILANO Via Cantoni, 7 


MILANO Via Petrella, 6 
MILANO Via A 
MILANO = 
MILANO v 


NOVARA Botvard 
PADOVA Via fisto 


PARMA Vio-Borghesi, 16 
PAVIA Vio C. Battisti, 4/A 


PERUGIA vio R 


49/55 


Desidero ricevere una copia OMAGGIO di SOFT-BANK il più ricco e completo 
catalogo dei programmi per personal computer e videogames. 
Allego L. 2.000 per contributo spese di spedizione. 


Nome Dl JU IL 
Cognome |_| BI | | 
sa [CCOD 
caal I IL LI] 
pata. I] LL] | 


SPEDIRE A REBIT COMPUTER 
CASELLA POSTALE 10488 
20100 MILANO 


I 
= 


Tai 


L 


Firma 


= 


PERSONAL & SOFTWARE 12/82 


D'And 


eotto, TERNI vi 


Il computer più 
venduto nel mondo 


iMmc_l=zsiir_ 


lo trovi nel tuo bit shop primavera 


PESCARA Via Guelfi, 74 
PIACENZA Via IV 
PISA Via XXIV Maggio, 10 

PISTOIA V.le Aduo, 350 

POTENZA Via M 72 
POZZUOLI via Pergolesi, 13 
i RIMINI Via Bertola, 75 


TORINO 
TORINO vie 
TORINO vic Tripol 
TRENTO via N 
| TREVIGLIO 
TRIESTE vio 
| VERONA va 
| VARESE 
VIAREGGIO vi n.79 
| VOGHERA Psc0 Corse | 
| 

| 


) Primavera fa, 
4 È] 
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Hard-copy del video su stampante 


Il programma che segue proviene dai tecnici della 
Tandy Radio Shack: 


1000 C=15360: D=C+63: FOR A=1 TO 15: FOR 
B=CTO D 

1010 E=PEEK(B): LPRINT CHRS$(E); 

1020 NEXT B 

1030 C=C+64: D=D+64 

1040 LPRINT 

1050 NEXT A 


Questo programma fa strane cose quando si tenta di 
stampare caratteri grafici. Il suo uso principale è tra- 
sferire su carta il testo che appare sul video. 


Come cambiare pagina con LPRINT CHR$(12) 


Recentemente ho perso tre ore per cercare di capire 
perché uno dei miei programmi non cambiava pagina 
correttamente usando l’istruzione LPRINT 
CHR$(12). La soluzione era abbastanza semplice e 


può darsi che qualche lettore possa trarre beneficio da 
questa mia perdita di tempo. 


Come sapete, la locazione 16424 contiene il massi- 
mo numero di righe per pagina, mentre la locazione 
16425 contiene il numero di righe già stampato. Quan- 
do viene mandato un CHR$(12) alla stampante, con 
una sottrazione viene ottenuto il numero corretto di 
line feed da mandare alla stampante per posizionarsi 
all’inizio della nuova pagina. Errore! Queste due loca- 
zioni di memoria contengono il numero di LPRINT 
per ogni pagina e il numero di LPRINT già mandati. 


Per esempio sulla mia stampante uso degli LPRINT 
per modificare il formato di stampa. La stampante non 
scrive niente, ma la locazione 16425 viene incrementa- 
ta di uno per ogni cambiamento effettuato. Se dovete 
modificare il tipo di carattere o la spaziatura o altro da 
programma, vi sarà capitato lo stesso problema. 


Un'altra cosa è che se le due locazioni menzionate 
prima contengono lo stesso valore, per esempio 67, 
un’istruzione LPRINT CHR$(12) mandata alla stam- 
pante provocherà il blocco del computer mentre la 
stampante continuerà a sfornare carta. Il solo modo 
per rimediare è premere RESET e ricominciare da ca- 
po. 
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Doppio schermo sul VIC 


Jim Butterfield 


Una delle caratteristiche più interessanti del VIC è 
il controllo sulle possibilità dello schermo. In questo 
articolo ci occuperemo di far muovere lo schermo. Na- 
turalmente lo schermo in se stesso non si muove, ma 
rimane dove avete piazzato il vostro televisore 0 il vo- 
stro monitor. Quello che vogliamo fare è cambiare le 
locazioni di memoria da cui lo schermo prende le sue 
informazioni. 


La schermata 


Le informazioni che appaiono sullo schermo pro- 
vengono dalla memoria del VIC. Ogni carattere sullo 
schermo corrisponde a un valore in memoria. Ogni lo- 
cazione sullo schermo è collegata a una specifica loca- 
zione di memoria. Ecco il trucco che intendiamo usa- 
re: vogliamo cambiare il collegamento, in modo che 
ogni locazione sullo schermo provenga da una diffe- 
rente cella di memoria. Se riusciamo a fare ciò, potre- 
mo memorizzare due schermi completamente separati. 
Poi, potremo passare alternativamente da uno scher- 
mo all’altro per ottenere effetti speciali o un utile dop- 
pio schermo. 


Nella memoria del VIC esiste una locazione che 
controlla dove lo schermo è agganciato alla memoria. 
Possiamo facilmente cambiare il contenuto di questa 
locazione provocando la comparsa del nuovo schermo. 
Ma questo non basta. 


Lavorare sullo schermo 


Dobbiamo cambiare anche i puntatori di lavoro del 
VIC, quelli che mettono i nuovi caratteri sul video. 
Non ci sarà di molto aiuto aver cambiato schermo, se 
continueremo a scrivere in quello vecchio. 


Un'altra cosa da fare: dobbiamo isolare la memoria 
necessaria per il secondo schermo. Ciò ridurrà ulte- 


riormente i già scarsi 3500 byte a circa 3000, ma sarà 
un sacrificio necessario. Dopo tutto, non vogliamo che 
il Basic metta il naso in questa zona dello schermo, 
ma, a meno che non provvediamo in modo adeguato, 
il Basic userà tutta la memoria che trova libera. 


Primo passo 


Provate a battere PEEK(56) e premere RETURN. 
Dovreste vedere un 30 sullo schermo. Qualsiasi altro 
valore significa che il vostro VIC non ha i soliti 5 K di 
memoria, e il resto del discorso non ha valore. 

Il valore 30 ci dice in quale “pagina” di memoria il 
Basic si è fermato. Una pagina è uno spezzone di 256 
byte. Dobbiamo ora togliere altre due pagine per libe- 
rare abbastanza spazio per il secondo schermo. 

Battete POKE 56,28: CLR seguito da RETURN. 
Ora abbiamo rubato circa 500 byte al Basic. Se non ci 
credete provate a scrivere PRINT FRE(0) e controlla- 
te. Non preoccupatevi troppo della perdita: ogni cosa 
tornerà al suo posto quando spegnerete la macchina; si 
tratta solo di un cambiamento momentaneo. 


Per cambiare schermo 


Ora provate a battere le seguenti quattro righe. Do- 
vete scusare la congestione, ma l’inserimento degli 
spazi non avrebbe permesso di far stare tutto il testo e 
ci saremmo trovati a mezza via nel cambiamento di 
schermo. Scrivetele come un blocco unico senza pre- 
mere RETURN: 


POKE36866,22:POKE648,2 
8:FORJ=217T0228:POKEJ, 
156:NEXT:FORJ=229T0240 
:POKEJ,157:NEXT 


Rileggete attentamente; un errore e dovrete spegne- 
re l'apparecchio e ricominciare da capo. Quando siete 
sicuri che è tutto a posto premete RETURN. 

Oplà! Siete nell’altro schermo. Ha un aspetto un po’ 
caotico, perché non è mai stato ripulito: eseguite un 
CLEAR e scrivete il vostro nome oppure qualcos’al- 
tro; potete anche cambiare colore ai caratteri. Ora per 
provare che abbiamo realmente due schermi, ritornia- 
mo indietro. 

Scrivete le prossime righe come un blocco unico: 


POKE36866,150:POKE648, 
30:FORJ=217T0228:POKEJ 


, 158:NEXT:FORJ=229T025 
0:POKEJ,159:NEXT 


Controllate attentamente, premete RETURN, e sie- 
te di nuovo nel primo schermo, 


Miglioramenti 


La prima cosa che può darvi fastidio è che, appena 
cambiato schermo, il VIC scrive READY, probabil- 
mente proprio in mezzo allo schermo nuovo. Questo 
non è un grosso problema; quando le istruzioni prece- 
denti sono inserite in un programma, esse vengono 
eseguite senza che venga stampato alcun READY. Un 
altro vantaggio dell’inserire le istruzioni in un pro- 
gramma è che non dovete più condensare tutto in una 
sola riga. 

Il secondo problema è meno appariscente, ma più 
serio. Le linee che precedentemente erano collegate, 
vengono spezzate; invece della nostra istruzione di 
quattro righe concatenate, abbiamo ora quattro righe 
ben separate. Ciò può non essere un problema per 
qualche tipo di messaggio e può addirittura essere pia- 
cevole se ottenuto intenzionalmente. Ma di solito vor- 
remmo ritrovare lo schermo così come lo abbiamo la- 
sciato. 

Il trucco sta nelle locazioni da 217 a 240: per recupe- 
rare lo schermo, questi valori devono essere esatta- 
mente gli stessi di prima del nostro intervento. Questo 
richiede un po’ di istruzioni aggiuntive. 


Il programma 


Ecco un breve programma per effettuare ciò di cui 
abbiamo bisogno. Il tasto F1 del VIC verrà usato per 
scambiare i due schermi. 


SCHERMO 
CLR 


100 REM  DOFF 
110 FOEE S4&,: 
150 


PRINT CHRE(147}: 


7&=CHR&(1 


GET X&: THEN GOSUE 400 
Z10 PRINT X&: (i) 
400 REM SCAMEIA 


I segreti dei personal 


4a 


V=FPEEE 
LACII=V 
NEXT J 
PRINT: 


J+2174L% (3) 


RETURN 


Ulteriori considerazioni 


Così funziona. Si possono avere tre, quattro o cin- 
que schermi? Sembra che non ci siano problemi. Sfor- 
tunatamente, bisogna scendere a un compromesso per 
realizzare una cosa simile, perché ci sono solo due ta- 
belle dei colori dello schermo. Non ne abbiamo ancora 


parlato, perché nel nostro esempio esse si selezionano 
da sole scambiando i due schermi. 


Omettendo l’istruzione PRINT alla riga 550, avrem- 
mo trovato un’altra stranezza: il VIC non cambia ef- 
fettivamente schermo finché non completa una riga. 
Non cerca una nuova locazione dove mettere i caratte- 
ri finché un RETURN o qualcos'altro non segnala che 
una riga è finita. Abbiamo scelto la maniera più sem- 
plice in questo caso; per cambiare schermo in mezzo a 


una riga avremmo avuto bisogno di un programma 
molto più complesso. 


Lasciamo questo esercizio allo stadio presente. È 


utile così com’è; non usa troppa memoria ed è abba- 
stanza semplice. 


Per quelli che vogliono capire il meccanismo: 36866 
è la locazione che scambia effettivamente i due scher- 
mi. 648 dice al VIC dove si trova lo schermo. I valori 
da 217 a 240 hanno due compiti. Primo: dicono al VIC 
dove le righe dello schermo devono essere concatenate 
per formare un’unica riga. Ho chiamato questa serie di 
valori “tabella di concatenazione dello schermo”, ma il 
nome è meno importante di quanto non sia capire il 
loro scopo. Le locazioni che controllano il colore sono 
nella parte alta della memoria, sopra 30000, e, per for- 
tuna, non dobbiamo prenderle in considerazione in 
questo caso. 
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* commodore 


Effetti simultanei nei giochi di movimento 


Ettore Massimo Albani 


Su un PET/CBM serie 2000, 3000, 4000 e 8000 si 
provi a premere il tasto A e, tenendolo premuto, a 
battere il tasto Q. Si noterà che il carattere Q non 
viene visualizzato. Si provi ora a fare l’opposto, cioè a 
premere il tasto Q e, tenendolo premuto, a battere il 
tasto A. L’effetto sarà quello di ottenere la sequenza 
AQ ogni volta che si preme e si rilascia la A. l 

Come mai si ottengono effetti diversi nei due casi? 
La risposta risiede nel sistema operativo del PET. 

Lo scopo di questa nota è comprendere il funziona- 
mento della routine di scansione della tastiera e simu- 
lare in ambiente Basic una sua gestione. Naturalmen- 
te, l’interesse non è solo didattico, ma prevede la riso- 
luzione di un grosso problema che si incontra nella ste- 
sura dei giochi utilizzanti la tastiera per muovere rac- 
chette o altro: l'impossibilità di premere più tasti per 
ottenere effetti simultanei sul video. 


La tastiera 


La tastiera degli elaboratori Commodore serie 2000, 
3000, 4000 e 8000 può essere raffigurata, per quel che 
riguarda i suoi collegamenti elettrici, come una matri- 
ce a 10 righe ed 8 colonne, dove, in corrispondenza 
degli incroci, sono presenti dei tasti. Per esempio, pre- 
mendo il tasto della lettera A, si chiude il circuito rela- 
tivo alla quinta riga (riga 4) ed alla prima colonna (co- 
lonna 0), come indicato in fig. 1. 

Si noti che degli 80 possibili tasti ne sono presenti 
solo 73 (o 76 nella tastiera della serie 8000 con i tasti 
TAB, ESC e REPEAT), non contando l'interruttore 
di SHIFT-LOCK inserito in parallelo allo SHIFT sini- 
stro. 


La gestione di interrupt 


Ogni sessantesimo di secondo il microprocessore 
6502 interrompe la sua normale attività per effettuare 
determinate operazioni, tra le quali vi è una particola- 


Co) 1 2 3 4 5 6 7 
; n CLR 
o % & ( e HOME | €> 

TN INST 
; | $ / ) y DEL 
A (e) E T U (e) î 7 9 
s__| w R Y I P 8 / 
a A D G J L 4 6 
5 s F H K 5 x 
3 z: € B M i RETURN 1 3 
7 x LV N n 2 2 + 
SHIFT @ 
8 Sx. ] » |: (o) = 
OFF RUN | SHIFT 
S RVS [I (SPACE) . STOP | DX. è = 
Figura 1. 


re procedura per sapere se è stato premuto un caratte- 
re sulla tastiera. Tale tipo di operazione viene detta 
interrupt ed è comandata dal clock del computer che 
60 volte al secondo attiva una particolare linea del 
6502 detta IRQ (interrupt request). Una volta attivata 
tale linea, il microprocessore memorizza nel suo regi- 
stro stack l’attuale contenuto degli altri suoi registri: 
ciò gli consentirà di riprendere più tardi l’elaborazione 
interrotta. Successivamente, esamina le locazioni di 
memoria FFFE ed FFFF (65534 e 65535 in decimale) 
per prelevare l’indirizzo di partenza della subroutine 
di interrupt. 

Come già detto, questa sobroutine esegue molte 
operazioni quali, ad esempio, l'aggiornamento dell’o- 
rologio TI, il rinfresco dei caratteri sul video, la scan- 
sione della tastiera, il controllo del bus IEEE-488, ecc. 


Il 6520 


Per la scansione della tastiera, il 6502 si avvale di un 
circuito integrato, il 6520, detto PIA (Peripheral Inter- 


face Adapter). Nel PET ne sono presenti due: il PIA 1 
ed il PIA 2. Si tratta di un’interfaccia programmabile a 
due porte bidirezionali da 8 bit ciascuna, che possiede 
al suo interno 3 registri ad 8 bit per ogni porta; tutta- 
via, di questi 6 registri, solo 4 sono indirizzabili diret- 
tamente dal 6502. Ciò significa che il 6502 li “vede” 
come locazioni di memoria RAM (E810, E811, E812 
ed E813; oppure 59408, 59409, 59410 e 59411 in deci- 
male per il PIA 1). I primi due registri appartengono 
alla porta A, mentre gli altri due alla porta B. Inoltre, 
essi si dividono ulteriormente in registro di controllo e 
registro dati. 


Il sistema operativo 


Tornando al nostro problema, il sistema operativo 
del PET esegue la scansione della tastiera partendo 
dalla riga 9 e proseguendo verso la riga 0; ad ogni riga 
vengono esaminate le colonne, a partire dalla colonna 
7 verso la colonna 0. Se durante la lettura della riga X 
il sistema operativo rileva che è stato premuto il tasto 
relativo alla colonna Y, esso fa ripartire la scansione 
dalla colonna 7, ripetendo questa operazione per 10 
volte prima di accettare il carattere corrispondente 
(questo per eliminare disturbi di vario genere). Inol- 
tre, il sistema operativo non accetta per più di una 
volta lo stesso carattere (questo ad evitare che, tenen- 
do premuto il tasto relativo, esso venga visualizzato 
più volte). Si intuisce che, tuttavia, se viene premuto 
un tasto con un numero di riga o di colonna maggiore 
di X o Y rispettivamente, il sistema operativo accetta 
il nuovo carattere e, dopo le 10 scansioni, lo visualiz- 
za. Immediatamente dopo averlo rilasciato, però, vie- 
ne riconsiderato il tasto (X,Y) ancora premuto e, do- 
po i soliti 10 tentativi, viene visualizzato. 

Se, invece, viene premuto un tasto con un numero 
di riga o di colonna inferiore ad X o Y rispettivamen- 
te, il sistema operativo non si accorge della cosa, poi- 
ché la scansione non può arrivare ad esso, essendo 
bloccata tra la riga 9 e la riga X e tra la colonna 7 e la 
colonna Y. Questo è, appunto, il caso del carattere Q 
che non può essere visualizzato finché rimane premuta 
una A. 


La simulazione 


Come fa il PIA 1 a gestire la scansione della tastie- 
ra? Il funzionamento risulta abbastanza semplice: i 4 
bit meno significativi della porta A, configurata come 
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porta di uscita, sono connessi ad un circuito integrato 
decodificatore, le cui uscite sono a loro volta connesse 
con le righe della matrice-tastiera (vedi fig. 2). La por- 
ta B è, invece, configurata come porta di ingresso e i 
suoi 8 bit sono direttamente connessi con le colonne. 
Per ottenere la scansione, il sistema operativo non fa 
altro che decrementare da 9 a 0 i 4 bit della porta di 
uscita A, osservando ciò che succede ai bit della porta 
di ingresso B. La decodifica, che ha le uscite a livello 
normalmente alto (+5 V), porta a livello basso (circa 
+0.5 V) solo l’uscita relativa alla combinazione in co- 
dice BCD presente all’ingresso. Premendo un pulsante 
della riga in esame, si ottiene come risultato quello di 
portare a livello basso la colonna relativa. Normal- 
mente, le colonne sono tutte a livello alto, perciò, pre- 
mendo ad esempio il tasto A, non appena i 4 bit della 
porta A segnano 0100 (4 in decimale), il registro dati 
della porta B da 11111111 diventa 11111110. 


Esiste la possibilità di disattivare la scansione auto- 
matica della tastiera agendo sul PIA 1, cioè si pone a 
zero il bit meno significativo del registro di controllo 
della seconda porta; ciò significa che occorre portare il 


contenuto della locazione E813 (59411), che normal- 
mente è 00111101, a 00111100. 


Il programma di fig. 3 è una simulazione in Basic 
del processo di scansione. L’unico neo di tale routine è 
dato dalla velocità limitata. Si noti anche che il nume- 
ro di tentativi di lettura-colonna è stato limitato a due 
e che la linea 110, oltre a “spegnere” la scansione, ini- 
bisce anche l’interpretazione del tasto di STOP: ecco 
perché è stata inserita la linea 310. Il funzionamento 
del programma è elementare; facendolo partire, ogni 
volta che viene premuto un tasto appaiono sul video i 
valori delle relative riga e colonna. 

Un’applicazione più interessante è quella che sfrutta 
questa tecnica per sostituire l’istruzione Basic di GET 
X$. Come esempio, si è scelto il programma 
“Ostacoli”, prelevato dal libro 32 programmi con il 
PET, edito da Franco Muzzio editore, Padova. Un li- 
stato del programma è riportato in fig. 4. Il gioco, per 
due persone, consiste nel chiudere l’avversario in un 
ipotetico muro, la cui costruzione viene diretta mano- 
vrando opportunamente ben 8 tasti. Infatti, ogni gio- 
catore dispone di 4 direzioni per costruire il muro, se- 
condo lo schema di fig. 5. 


Come si osserva dal listato, la routine per prelevare 
il carattere inizia alla linea 255 e termina alla linea 
340. E evidente che la routine accetta un solo caratte- 
re, per cui, se uno dei due giocatori tiene premuto un 
tasto, può inibire il funzionamento di quelli del suo 
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Loc. E810 
(59408) 
bit 0 
bit 1 
bit 2 


bit 3 


Loc. E812 
(59410) 


bit 
01234567 


pio--00- 


po---a0000 


Figura 2. 


100 REM # KEYSCAN 
105 REM #« DISABILITA INTERRUPT 
110 POKE 59411,401 R=-91 C=-91 YY=-9 
115 REM #@ SCANSIONE RIGHE 
120 FOR X=9 TO 0 STEP -I 
125 REM « ABILITA LA X-ESIMA RIGA 
130 POKE 59408,240+X 
195 REM ® SCANSIONE COLONNA 
140 K=PEEK(59410)1 IF K=255 THEN 290 
F CK AND 128)=0 THEN Y=71 GOTO 230 
soTo 230 


Goro 230 
190 IF (K AND 8)=0 THEN Y=31 GOTO 230 
200 IF CK AND 4)=0 THEN Y=2: GOTO 230 
210 IF CK AND 2)=0 THEN Y=i1 GOTO 230 
220 IF (K AND 1)=0 THEN Y=0 

225 REM ® RIPETIZIONE ANTI DISTURBO 

230 IF YYK)Y THEN N=0: Yyay 

240 NeNeii IF N=2 THEN N=0: GOTO 260 
250 GOTO 140 

255 REM # CONTROLLO VALIDITA’ CARATTERE 
260 IF ReX AND C=Y THEN M=01 GOTO280 
270 ReX 1C=Y1 PRINT *RIGA*R"COLONNA*C 
280 x=0 

290 NEXT Xx 

295 REM # DOPO 4 CICLI DIMENTICA 

300 Mette 11: IF Mea THEN M=01 R=-91: C=-9 
305 REM » E‘ STATO PREMUTO LO STOP ? 
310 IF_R=9 AND C=4 THEN 330 

320 GOTO 120 

330 PRINT “STOP"1 POKE 59411,61 


Figura 3. 


rO & 


primave 


in Italia. 


(I 
$ 
S 
È 
9 


a prima e la più grande 


L 
catena di 


avversario. con le priorità stabilite dalla matrice di fig. 
dl, 

In fig. 6 vi e la routine modificata. La linca 253 ser- 
ve a rallentare la costruzione del muro. mentre le lince 
157 e 158 sono state aggiunte per l'assegnazione delle 
variabili. 


100 REM:OSTACULI 

REMICOR>RIUMT 1928 &: TOM RI 
TEU P3RND TI \in0Sue e00 

125 PRINT CHAG: LAT UIPRINT 

130 PRINT TAB 15\;CMES\ 161: SSTACOLI" 

196 PRINT:PRINT 

150 PRINT* BATTI UN TASTO QUALUNQUE FER PARTIRE* 

151 1290: F3=243: Ra=zad: c72247 

15° coni: Cim2i (254: L3=b: (dele: CSe3l: Témed: (7128 
Sk PA=S9408: PB=S9410: CB=SWAI1: IN260: Nissl: Mi=255 
< Xe 10:Av=12:B%=29:8Y=!210n96:B=102 

35 S=32766:E=127:ADSINT deRNDI1)'ei 

167 BO=IfTiaeRNDi 1 cei 

1° GOSUB 900:GOSUB 950 

180 GET R$:1F Rs="* THEN 120 

199 PRINT CHRSC147): 

200 GOSUB 950:GOSUB Soc 

205 FOR Jsi TO 10:GET RE.NEYT 

210 xmanivsariDeal:GOSUE 1000 

220 ARSR:AMmziAvar 

230 «eBr:vaBì :0=BD:GOSUE 1100 

ZA BRER:BX=y :BY=y 

245 IE AR=: OR BRei THEN agu 

250 GOSUB 900 

253 FOR Jmi TO SQ: NEXT 

255 POKE CBLIN 

260 POKE PARI: K=PEEW(PB:: IF «NL THEN 275 

265 IF \K AND CO)=0 THEN AD=I 
270 IF <k AND Cé=0 THEN BO=1 

275 POKE PA,RA: K=PEEKCPB): IF K=NL THEN 300 
280 IF ‘k AND CO)=0 THEN AD=3; GOTO 290 

285 IF Ck AND CI)=0 THEN AD=4 

290 IF (K AND Cé:=0 THEN BD=3: GOTO 300 

295 IF \k AND C7)=0 THEN BD=d 
300 POKE PA,R7: K=PEEK(PB): ]F 
305 IF (K AND CO)=0 THEN AD=2 
310 IF CK AND Cé.=0 THEN BD=2 
315 POKE CB,NI 

350 GoTG 210 

0 GOSUB 700:x=Ax:v=Ay 

410 IF BR=i THEN x=Bx:Y=By 
420 FOR Je) TO 15 

430 POKE Seadevix,? 

440 FOR K=1 10 200:NExT 

450 POKE S+400v+x,2+126 

460 FOR K=1 TO 200:NEXT 

470 NEXT 

480 FOR J=ì TO Z0:GET RS:NEXT 
490 GOTO 125 

600 PRINT CHR$(147) 

610 INPUT*NOME DEL GIOCATORE DI SINISTRA" ;AG 

#20 PRINT 

430 INPUT*GIOCATORE DI DESTRA" :B8 

840. RETURN 

Z0C PRINT CHRSCIS); 

ZIO FOR Jai TO 12 

720 PRINT CHR8(17) :NEXT 

730 IF AR=I AND BR=1 THEN PRINT*AVETE PERSO ENTRAMB 
740 RSsAS:IF AR=1 THEN R@=Bs 

750 PRINT “VINCE ‘588; 
760 RETURN 

#00 POKE (S+agsarsAz) A 

PIO POKE (S+agegyepx) E 

520 RETURN 

950 FOR x=0 TO 39 

#60 POKE S*x,E:POKE 5*880+%,E 

370 NEXT.FOR rso TU 22 

EB0 POKE +SvaGer, .E:POKE (50400139) ,E:NExT 
390 RETURN 

1000 IF D=1 THEN v=y-1 

1010 IF t=2 THEN rare) 

1020 1F D=3 THEN x=x-1 

1030 IF D=4 THEN vere) 

1040 R=0 

1050 IF PEEK(S+aGeyex) 32 THEN Rei 

1000 RETURN 


K=NU THEN 315 


1 RETURN 


REALI. 


Figura 4. 
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250 
253 
255 
260 
268 
270 
275 
280 
285 
290 
295 
300 
305 
310 
3IS 
350 


Figura S. 


R3=293: Rd=244: R7m247: Ci=2: C2nd: (Inf: (dm, o: 15237: Comod: (7a; 
PA=594081 PB=59410: CB=S9A11: INa60: NI=msl: Ni =295 


GOSUB 900 
FOR Jei TO SO: NEXT 

POKE CB, IN 

POKE PAIRI: K=PEEKIPB1: 1F 
IF CK ANO CO)=0 THEN AD=| 
IF (h AND Cé'=0 THEN BD=i 
POKE PA,RA: KePEEK: PB): IF 
IF \k AND CO)mO THEN AD=3: 
IF CK AND Ci)m0 THEN AD=a 
IF CK AND Cé}m0 THEN BDm3: 
IF (K AND C7)m0 THEN BDmd 
POKE PA,R7: K=PEEK\PB): IF 
IF CK AND CO)mO THEN AD=2 
IF CK AND C6)=0 THEN BO=2 
POKE CB,NI 

Goro 210 


uti THEN 275 


Ken THEN 300 
GOTO 290 


GOTG 300 


vel THEN 315 


Figura 0. 
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La torre di Hanoi 


Mauro Boscarol 


La torre di Hanoi è un vecchio gioco di tipo 
logico-matematico. Racconta Martin Gardner 
nel volume 1 di Enigmi e giochi matematici 
(Sansoni), che fu inventato da un matematico 
francese, Edouard Lucas, che lo mise in vendi- 
ta nel 1883. 


A B E 


In figura è rappresentata la situazione iniziale 
del gioco. Il problema è trasferire gli otto dischi 
della torre dal piolo in cui sono attualmente 
(A) al piolo C, rispettando le seguenti regole: 


(a) si può spostare solo un disco alla volta; 
(b) non si può mettere un disco più grande so- 
pra ad uno più piccolo. 


La descrizione originale del gioco parla della 
mitica “torre di Brahma” esistente un tempo 
nella città di Benares. Questa torre, diceva la 
descrizione, consiste di 64 dischi d’oro, che at- 
tualmente i sacerdoti del tempio stanno spo- 
stando. Prima che essi possano portare a termi- 
ne il loro compito, si diceva, il mondo scompa- 
rirà. 

A parte questa suggestiva descrizione, la so- 
luzione del gioco si può trovare con un algorit- 
mo di tipo ricorsivo. Ne risulta un bell’esempio 
di applicazione di questa tecnica e un classico 
esercizio scolastico sulla ricorsività. 

Per risolvere il problema per n cerchi, con- 
viene immaginare di saperlo fare per n-1 cer- 
chi. In tal caso si possono spostare i primi n-1 
cerchi da A a B, poi il cerchio rimasto da A a C 
e infine gli r-1 cerchi da B a C. Indicando con 
n: A—B lo spostamento di n cerchi da A a B, il 
problema si risolve come in figura 1, dove n: 
A-C significa spostare n cerchi da A a C. 

Resta il fatto che abbiamo immaginato di sa- 
perlo fare per n—1, ma in effetti non lo sappia- 
mo fare. Immaginiamo allora di saperlo fare 
per n-2 dischi. 
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Fig. 1. 


In tal caso, per spostare n—1 dischi da A a B 
si fa come in figura 2, e per spostare n—1 dischi 


Fig. 2. 


Fig. 3. 


da B a C si può fare come in figura 3 e quindi la 
figura 1 si può completare nella figura 4. 


Fig. 4. 


Naturalmente per n—2 dischi non sappiamo 
farlo, ma possiamo immaginare di saperlo fare 
per n--3 dischi, e così via fino a che si arriva ad 
un disco: questo sappiamo farlo veramente. Per 
esempio, se n=4, lo schema completo è quello 
della figura 5, e quindi le mosse da fare sono 
quelle che si leggono dall’alto verso il basso: 
A+B, A+C, B4+C, A+B, CHÒA, CB, 
A-B, A+C, B4C, B4A, CÒA, B4C, 
A-+B, A+C, B4C. 

Si può anche tenere a mente una regola: una 


< QUI 1IIIIIDIDNIADILIIDADIBIETITEVINIBA BRAVI DIARI DIARI ORA BRA ORE BREDA DAI ORBERINKERENRARI ADONE NRE ORE vRO REA nRERR EDRN A RRA RARI A RRn NARRATE 


Fig, 5. 


volta sì e una volta no si muove il disco più piccolo in 
modo circolare. Quando non si fa questa mossa, si fa 
l’unica altra possibile. 

Si può controllare facilmente che le mosse per spo- 
stare n dischi sono 2"—1. I sacerdoti del tempio, per 
spostare 64 dischi, ci avrebbero messo 2%—1 mosse. Si 
tratta di un numero di 20 cifre: 

18 446 744 073 709 551 615 

Se anche riuscissero a spostarne uno al minuto sa- 
rebbero sempre trenta miliardi di millenni, ed effetti- 
vamente in così tanto tempo il mondo ha molte proba- 
bilità di scomparire. 

Noi però possiamo fare un po’ meglio, facendo lavo- 
rare un calcolatore. 

Il listato Basic qui riportato risolve il gioco per n 
dischi senza utilizzare procedure ricorsive (che del re- 
sto nel Basic non sono implementate) né simulandole. 

Eseguendo questo programma, ricordatevi dei sa- 
cerdoti del tempio. Un computer non ci mette un mi- 
nuto a spostare un disco, questo è vero, però non ci 
mette poi tanto meno: diciamo 100 volte di meno. Per 
n=64 sono trecento milioni di millenni. 


10 INPUT"NUMERO DI DISCHI"SN 

Ist 
OI 
40 GOSlUB1O0O 
50 END 
100 IF N=0 THEN TURN 
1L0 

ERCHIO DA"I"A"J 


N=N+1 
RETURN 
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Non esiste, in lingua italiana, un libro di testo così. Chiaro, completo, 
moderno, ma anche rigoroso e didattico. Sono alcuni tra gli aggettivi 
che costituiscono la prerogativa di questo volume. Per capire 
l'elettronica digitale bisogna avere delle solide conoscenze sui dispositivi 
a semiconduttore, soprattutto usati in circuiti di commutazione 

E malgrado quest'analisi richieda una notevole complessità matematica. 
introducendo alcune semplificazioni è possibile mantenere la trattazione 
ugualmente rigorosa e ottenere approssimazioni pienamente accettabili 
Come trascurare poi gli amplificatori operazionali, che, se a rigore non 
rientrerebbero nella materia, però trovano larga applicazione in sistemi 
completamente digitali. E poi i circuiti integrati, finalmente spiegati e 
analizzati in tutti i loro aspetti. Dalla vecchia logica resistore-transistor 
(RTL), funzionale nella sua semplicità all'esemplificazione degli aspetti 
fondamentali, a quella a simmetria completamente (CMOS) 

Questo, però. dopo aver studiato un capitolo che, pur non richiedendo 
alcuna conoscenza preliminare, va a fondo dei concetti di variabile 
logiche, di algebra di Boole, di analisi di circuiti logici. E ancora. Via via 
nei vari capitoli: i flip-flop, i registri, e i contatori (sia sincroni che , 
asincroni), i circuiti logici atti ad eseguire operazioni matematiche, le 
memorie a semiconduttore (RAM, ROM, EPROM. ....). l'interfacciamento 
tra segnali analogici e digitali (multiplexer. circuiti sample and hold, 
convertitori d/a e a/d), i temporizzatori. Tutto con oltre 400 problemi, dai 
più semplici ai più sofisticati, in cui vengono presentati i circuiti tipici 
che si trovano nella pratica. 

Un testo quindi non solo per gli specialisti e per gli studenti universitari, 
ma che si adatta magnificamente agli Istituti Tecnici 

Un testo che, speriamo per gli studenti, la scuola non debba scoprire tra 
alcuni anni 


SOMMARIO 
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Semiconduttore; Interruttori Analogici; Conversione Analogico- 
Digitale; Circuiti di Temporizzazione; Linee di Trasmissione; Problemi 
Alcuni Esempi di Specifiche. 


GRUPPO EDITORIALE JACKSON 
Divisione Libri 


Per ordinare il volume utilizzare l'apposito tagliando inserito in fondo alla rivista. 


> 
21 


è in 
edicola 


il nuovo 
nUmere 


® TRS-80, IL MAESTRO 


SENZA VOTI Sg ® m 
© HP.75: (Sa A FERA 
UN PROTAGONISTA | 


TRA | PORTABLE 
COMPUTER 


TRS-80, IL MAESTRO SENZA VOTI 


-75: UN PROTAGONISTA TRA 
2HP-75 “ PORTABLE COMPUTER 


® BITEST: KYBER MINUS— DÌ 


® SMAU ’82 


® LE CALCOLATRICI 
PROGRAMMABILI 


@ 
er, 
@ APPLE, ATARI, PET, 
SINCLAIR E VIC CLUB— 


@® SOFTWARE IN VETRINA 
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L arte di programmare aut 


Regole di stile per autori di software 


Nino Tonolli 


Sebbene gli autori abbiano riferito queste note 
alle applicazioni di tipo didattico, i loro suggeri- 
menti possono essere applicati a tutti i tipi di 
programmi. 

Sulla scia del rapido sviluppo della tecnologia 
dei computer, i creatori di software devono 
soddisfare la richiesta di programmi per ogni 
nuovo computer. Esiste in questo momento 
una abbondanza di software. Solo una piccola 
percentuale è di tipo educativo e la qualità dei 
programmi varia in modo notevole. 

Questo dipende in larga parte dal fatto che i 
programmi di tipo educativo sono stati scritti da 
hobbisti, educatori, editori, aziende di software 
o aziende che producono computer. Non esiste 
un formato e una qualità standard, né coerente. 
Ciò rende i programmi difficili da usare e da 
capire. 

Quella che segue è una lista di standard di 
programma, stilata nella Lawrence Hall of 
Science. Essa può servire da guida per chi deve 
scrivere o modificare programmi per uso sia 
privato che dimostrativo. 

Per la maggior parte questi standard sono in- 
dipendenti dal particolare computer utilizzato e 
possono essere applicati a programmi scritti per 
qualsiasi macchina. 


L’inizio del programma 


1. Scrivete delle righe di commento (REM) al- 
l’inizio del programma per identificarlo e de- 
scriverlo. La documentazione esterna può esse- 
re persa, così è necessario che il programma 
stesso la contenga al suo interno. Le istruzioni 
REM devono fornire le seguenti informazioni: 
(a) nome del programma, 
(b) descrizione del programma in una riga, 
(c) tipo di computer per cui è scritto (se ne- 
cessario, il modello o la versione di 
ROM), 
(d) occupazione minima di memoria (in Kby- 
te) richiesta per l’esecuzione, compresa 
l’area occupata dalle variabili, 


(e) linguaggio o versione di linguaggio (es. In- 
teger Basic o Applesoft Basic), 

(f) eventuali periferiche necessarie (es. joy- 
stick, palette, stampante, disco ecc.), 

(8) quanti e quali file vengono usati (es. sul- 
l'Apple, quali file sorgente o in linguaggio 
macchina o subroutine sono letti da file), 

(h) autore o azienda produttrice, 

(i) indirizzo dell’autore o azienda, 

(j) data di stesura del programma, 

(k) indicazioni di copyright o permesso di du- 
plicazione, 

(1) modifiche apportate alla versione base, 
(m) autore delle modifiche, 
(n) data dell’ultima modifica apportata. 
2. Inizializzate il computer secondo lo scopo 
del programma. Per esempio se dovete usare la 
grafica e le maiuscole del PET, il computer de- 
ve essere predisposto per ciò. Sull’ Apple dovre- 
te invece predisporre la pagina di testo se avete 
bisogno di scrivere sul video. Non date per 
scontato che il computer sia già predisposto nel 
modo corretto. 

3. Cancellate lo schermo, così i resti di altri 

programmi non saranno visibili dagli utilizzatori 

del programma. 

4. Fate scrivere il nome del programma insie- 

me ai convenevoli (es. “Benvenuti al gioco del- 

la cava”). Questo permette all’utilizzatore di 

sapere che tipo di programma sta girando in 

quel momento. 


5. Chiedete all'utilizzatore se desidera vedere 
le istruzioni. Se è già esperto del programma 
può voler saltare le istruzioni. 


Istruzioni 


6. Spaziate le righe di spiegazione, così saran- 
no più facili da leggere. 


7. Contenete le istruzioni in tre pagine di testo. 


8. Usate diagrammi di spiegazione ovunque 
possibile. 


-  . ,WW.W.W.W..5.5.Ò.éé° °C CGJGJG°G°Gcci{i iii 


9. Scegliete un carattere (per es. I per indietro) 
che permetta all’utente di tornare indietro alla 
parte di istruzioni che precede quella visualizzata. 


10. Dopo aver fornito le istruzioni, chiedete all’utiliz- 
zatore se intende effettivamente continuare con il pro- 
gramma (es. “Vuoi giocare?” “Se sei pronto premi un 
tasto”). Dopo aver letto le istruzioni, può aver deciso 
di non provare il programma. Se non volete permette- 
re questa scelta dell’utente, saltate questo passo. 

11. Includete nel programma dei richiami al modo di 
giocare. Per esempio, se l’utente deve introdurre delle 
coordinate, il programma può ricordargli di scrivere 
due numeri separati da una virgola. 


Input 


12. Usate routine di input piuttosto che istruzioni IN- 
PUT. L'istruzione Basic INPUT ha parecchi difetti 
che possono essere evitati. La routine dovrebbe: 

(a) pulire il buffer della tastiera prima di accettare i 
dati; caratteri eventualmente già presenti posso- 
no essere dovuti a errori e devono perciò essere 
ignorati, 

(b) evitare che l’utente possa fermare il programma 
premendo il tasto RETURN senza aver inserito i 
dati, 

(c) evitare che l’utente possa cancellare troppi carat- 
teri correggendo i dati scritti (per es. l’utente non 
deve poter cancellare il testo della domanda), 

(d) eliminare l’effetto dei caratteri che controllano il 
cursore o che cancellano lo schermo, battuti dal- 
l’utente; 

(e) limitare il numero di caratteri che possono essere 
immessi; per esempio, se volete che siano inserite 
non più di nove cifre, l’utilizzatore non deve po- 
ter scrivere più dei nove caratteri necessari, 

(f) permettere che il cursore possa essere spostato a 
sinistra di una posizione, per cancellare un carat- 
tere alla volta quando l’utente corregge i suoi er- 
rori; i caratteri a destra del cursore non devono 
essere trascinati a sinistra nelle operazioni di cor- 
rezione. 

13. Fate aspettare il programma finché l’utente non 

preme il tasto RETURN dopo aver introdotto i dati, 

piuttosto che continuare col programma appena viene 
premuto un tasto. 

14. Verificate che i dati introdotti non siano errati. Se 

viene commesso un errore, spiegatene il tipo e chiede- 

te di nuovo i dati all'utente. Per esempio, se un utente 
batte una lettera al posto di un numero, un messaggio 

di errore potrebbe essere: “Ricordati, puoi usare solo 

numeri . 

15. Lasciate abbastanza spazio dopo ogni domanda 

(per esempio: “Come ti chiami?”) per poter battere la 

risposta senza andare nella prossima riga. 

16. Nelle domande SI/NO, controllate solo la prima 

lettera della risposta. Se questa non è una S o una N, 

chiedete all'utente di scrivere SI o NO e ripetete la 
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domanda. Questo permette all’utilizzatore di rispon- 
dere con una sola lettera o con l’intera parola. 

17. Controllate che non si verifichino errori nel pro- 
gramma a causa dei dati forniti. (Per esempio una di- 
visione per zero, un superamento dello spazio disponi- 
bile per le stringhe, ecc.) Eventualmente date un mes- 
saggio di errore per l’utente al momento dell’input. 


Nel programma 


18. Organizzate il testo in pagine anziché farlo scorre- 

re verso l’alto, oppure usate delle temporizzazioni per 

permettere all’utente di leggere comodamente. Si de- 

ve: 

(a) per prima cosa cancellare lo schermo, ; 

(b) stampare una pagina di testo facendo attenzione 
che non scorra verso l’alto, 

(c) riservare l'ultima riga di testo di ogni pagina per 
poter stampare eventuali messaggi di errore o del 
tipo “Premi lo spazio per continuare”. 


Alla fine del programma 


25. Al termine del programma chiedete all’utente se 
vuole riprovare. Permettetegli di modificare le condi- 
zioni iniziali (per esempio il livello di difficoltà o il 
limite massimo di tempo) se lo desidera. 

26. Se l’utente ha terminato il programma o lo inter- 

rompe. questo dovrebbe: 

(a) pulire lo schermo, ql 

(b) dare un giudizio sulle prestazioni dell’utente, se è 
il caso, 

(c) finire, lasciando i commenti finali sullo schermo e 
posizionando il cursore all’inizio di una riga 
sgombra per permettere all’utilizzatore di inserire 
un comando, oppure: 

(d) chiedere all’utente di premere lo spazio e dopo 
aver ricevuto conferma, far partire un “menù” 
che faccia la lista dei programmi disponibili. i 

Gli standard che abbiamo descritto sono un tentati 
vo di dare dei suggerimenti per scrivere programmi 

che si spieghino da soli, facili da capire e da usare, e 

relativamente privi di errori. Accettiamo volentieri 

eventuali suggerimenti o aggiunte. 
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Libri di software annui 


Imparare il Basic dei personal 


Giuseppe Staluppi 


Quasi due anni fa, nel gennaio dell’81, l’edi- 
tore Franco Muzzio di Padova iniziava a pub- 
blicare una serie di libri specificamente rivolti 
agli utenti dei personal computer. In questo pe- 
riodo di tempo la collana è cresciuta ed ora 
conta una quindicina di volumi. Si tratta di testi 
dedicati ai personal computer in generale, al 
Basic, al PET/CBM, all’Apple, al TRS-80, al 
Pascal, al CP/M e ad altri argomenti tutti con- 
nessi con i personal computer e le loro applica- 
zioni. 

Credo che i titoli più rappresentativi della 
collana siano i due volumi intitolati /! Basic e il 
personal computer, il primo dedicato ad una in- 
troduzione generale, il secondo dedicato alle 
applicazioni. 

Caratteristica di questi volumi è la loro gene- 
ralità: possono essere letti da chiunque e vanno 
bene per qualunque tipo di personal computer. 

Il primo volume comprende un breve ma 
completo corso di Basic: in otto lezioni si impa- 
ra a conoscere l’argomento e si inizia a pro- 
grammare in questo linguaggio. I primi, sempli- 
ci programmi che vengono poi proposti sono 
elementari esercizi di grafica: grafici di funzio- 
ni, istogrammi. 

Il secondo volume entra nel vivo delle appli- 
cazioni. Numerose pagine sono dedicate ai me- 


Thomas Dwyer e Margot Critchfield 
Il Basic e il personal computer 
uno: introduzione 
198 pagine, 9.500 lire 
Il Basic e il personal computer 
due: applicazioni 
214 pagine, 14.000 lire 
Padova: Franco Muzzio & c. editore, 1982 


todi di ordinamento, dai più semplici ai più 
complessi. Un’altra sezione è dedicata ai gio- 
chi: giochi su scacchiera, giochi d’azzardo, gio- 
chi dinamici, giochi di simulazione. Si parla poi 
di computer art, di basi di dati, di simulazione. 

Complessivamente, il materiale presentato è 
molto abbondante e piacevole. Ma la cosa che 
maggiormente colpisce il lettore è lo stile ami- 
chevole e informale con cui i due libri sono 
scritti. Le numerose illustrazioni e i numerosis- 
simi listati di programmi, pronti per essere inse- 
riti nel vostro personal, rendono la lettura pia- 
cevole e l'apprendimento sicuro. 

Se siete alla ricerca di un modo facile ed at- 
traente di imparare il Basic, questi due volumi 
fanno al caso vostro. 


i) NODDMAMARANDONATONG000T000RT00N 00000000000 0T00000T0HO)T) ATO) DO ONORIO ORA DNI 


br 


Seconda parte: 
Tecniche euristiche 


di Gregg Williams 


La riproduzione di questo articolo 
è stata concessa da BYTE. 
Traduzione di Flavio Santini 
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PERSONAL SOFTWARE 


Ricerca su alberi 


alberi, per motivi di cui parle- 

remo in seguito, trovano alla 
fin fine il cammino ottimale dal no- 
do di partenza S alla meta più vici- 
na ad esso. L’espansione di tipo 
esponenziale di molti problemi può 
superare le disponibilità di memo- 
ria e di tempo anche dei computer 
più grandi; per questo sono stati 
studiati metodi che limitano il nu- 
mero di nodi estesi, considerando 
però i nodi che conducono alla me- 
ta più vicina. Queste tecniche euri- 
stiche raccolgono informazioni da 
un nodo e le usano per determina- 
re la probabilità di trovarsi sul 
cammino minimo verso una meta. 

In questo articolo avremo modo 
di trattare due tipi di tecniche euri- 
stiche, accettabili e non accettabili, 
e le proveremo utilizzando il pro- 
gramma Basic della prima parte 
dell’articolo. 


Fei esaustivi di ricerca su 


Teoria per l’algoritmo accettabile 


Una strategia di ricerca sull’albe- 
ro di un problema consiste nell’or- 
dinare la lista dei nodi non estesi 
assegnando a ciascun nodo un va- 
lore numerico e conferendo al pro- 
gramma la capacità di scegliere co- 
me nodo da estendere quello col 
valore più basso (è il metodo usato 
dal programma SEARCH nella 
prima parte di questo articolo). 
Sebbene l’algoritmo possa agire 
con qualsiasi ordinamento che por- 


ti al risultato corretto, una piccola 
restrizione al genere dell’ordina- 
mento dà luogo ad un algoritmo di 
ricerca che trova sicuramente sia 
una meta che la meta ottimale — 
cioè la meta con costo minore. Un 
algoritmo di questo tipo si dice ac- 
cettabile. 

Consideriamo l’albero parziale 
della figura 1. (Supporremo che i 
cammini da S ad n e dan a G siano 
i percorsi minimi). Definiamo con 
g(n) il cammino minimo dal nodo 
iniziale S ad n; e con A(n) il cam- 
mino minimo da n alla meta più vi- 
cina G. Allora 


fn) = g(n) + h(n) 


è il costo del percorso ottimale ver- 
so una meta, passando per il nodo 
n. (Se questo cammino non esiste, 
il costo si dice indefinito; in un 
programma, alla variabile di costo 
relativa verrebbe assegnato un va- 
lore alto arbitrario .) 

Ora che disponiamo delle tre 
funzioni f, g ed 4, ne definiamo al- 
tre tre, f (da leggere “f-cappello”), 
8 ed À, che, in una data situazione, 
sono stime delle funzioni minime 
teoriche (spesso sconosciute) f, g 
ed A. In altri termini, f(n) è il costo 
stimato per il percorso minimo da 
S a G attraverso n; g(n) è il costo 
stimato del cammino minimo da S 
ad n (ricordate che un percorso da 
S ad n può non essere minimo); ed 
h(n) è il costo stimato del cammino 
minimo da n alla meta più vicina 
(che è, al momento, ignota). 


Fig. 1. Un pezzo di albero. In questa rappresentazione, ogni stato (nodo) 
del problema è dato da un punto ed ogni ramo rappresenta il passaggio da 
uno stato a quello successivo. Il nodo S è il problema originale, mentre il 
nodo n e tutti gli altri sono tappe intermedie sulla via verso la soluzione (il 
nodo G, la meta). 


Intuitivamente, senza dimostra- 
zione, la condizione necessaria per- 
ché un algoritmo che trova A(n) sia 
accettabile è che il metodo d’ordi- 
namento dia luogo ad un valore si- 
curamente minore o uguale, per 
ogni nodo n, al costo del percorso 
minimo che va da n alla meta più 
vicina. Formalmente la condizione 
si esprime così: 


fm <f@) 


Se questa condizione è sempre ve- 
rificata, allora l’algoritmo di ordi- 
namento è accettabile. (I lettori in- 
teressati alla dimostrazione la tro- 
veranno in Problem Solving Met- 
hods in Artificial Intelligence, di 
Nils Nilsson, 1971, pagg. 59-65.) 


Consideriamo due algoritmi che 
si riconoscano facilmente come ac- 
cettabili. Il primo è quello del me- 
todo breadth-first, che non dà in- 
formazioni sul valore relativo ad 
ogni nodo — cioè h(n)=0. (Nota: 


il programma sviluppato nella par- 
te 1 utilizzava un valore diverso 
per la variabile di &(n), DI, a scopo 
dimostrativo; comunque, D/=0 
darà lo stesso risultato.) Poiché ze- 
ro è un limite inferiore per il costo 
minimo relativo a qualsiasi nodo, 
meta o non meta (cioè 0 < A(n)), 
alla luce della disuguaglianza di cui 
sopra l’algoritmo breadth-first ap- 
pare accettabile. Tuttavia, come 
sappiamo per esperienza, l’algorit- 
mo breadth-first è non selettivo; 
cioè estende tutti i nodi in ordine 
crescente di livello finché trova la 
prima (e perciò minimale) meta. 
Così la totale assenza di informa- 
zioni euristiche accompagna e mi- 
sura la sua inefficienza. 

D'altro canto, consideriamo un 
algoritmo d’ordinamento À che dia 
esattamente il costo del percorso 
minimo da n a G; in altre parole, 
h(n)=h(n) per tutti gli n, il che 
soddisfa ancora la disuguaglianza 
precedente. Che significato ha? Ri- 
flettendo un attimo vi convincerete 
che, primo, poiché questo algorit- 


mo fornisce informazioni complete 
sullo stato del sistema, raggiungerà 
sicuramente la meta più vicina G; 
secondo, lo farà senza estendere 
‘alcun nodo superfluo. Cosa c’è di 
più semplice? Siccome l’algoritmo 
di ricerca estende sempre il nodo 
con il più piccolo valore di À, e sic- 
come in questo caso il valore di 4 è 
esattamente il costo del percorso da 
quel nodo alla meta, l’algoritmo di 
ricerca, ad ogni estensione, si avvi- 
cinerà di un nodo alla meta. Perciò 
la presenza di informazioni euristi- 
che complete corrisponde alla mas- 
sima efficienza. 
A partire dagli estremi 


h(n)=0 
h(n)=h(n) 


ci aspetteremmo di trovare un h(n) 
che soddisfa 


0< h(n)< h(n) 


intermedio tra i due limiti di effi- 
cienza, con efficienza proporziona- 
le all'avvicinarsi di A(n) ad h(n), 
per tutti i nodi n. Ed in effetti è 
così: dati due algoritmi d’ordina- 
mento accettabili A (che genera 
h(n)) ed A* (che genera h*(n)), si 
dice che A* dà più informazioni di 
A se h* è sempre maggiore o ugua- 
le di È, oppure: 


h(n) < h*(n) < h(n). 


È stato anche dimostrato che A* 
estende con certezza un numero di 
nodi minore o uguale di quello di 
A (si veda ancora il citato testo di 
Nilsson). ; 

C'è ancora qualcosa a proposito 
della differenza tra le ricerche su 
alberi e su grafi. Il costo di un no- 
do ancora da estendere, g(n), in un 
albero è uguale al suo costo teorico 
minimale g(n), perché, per defini- 
zione, c'è un unico cammino dalla 
radice S a qualsiasi altro nodo. Poi- 
ché un grafo può contenere più di 
un percorso da S ad n, il costo di 
un cammino trovato può non esse- 
re quello minimale e perciò dev'es- 
sere chiamato g(n). Tuttavia, un 
algoritmo accettabile che non cam- 
bi la sua natura durante la ricerca 
su grafo produrrà solo cammini ot- 
timali verso nodi estesi, cosicché 
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(1a) 


9881 REM 
9884 REM 
9885 REM ALGORITMO “OUT-0F-FLACE”, 


ACCETTABILE 


9900 R1=0 
9910 FOR I=1 TO R9: 
9915 Q=ASC(E%(I,J)) 
9920 IF 0=46 THEN 9960 
9925 IF 0:64 THEN N= S: GOTO 9935 
9930 IF 04=57 THEN N=0-48 
9935 F1=R9%X(I-1)+J 

9940 REM -P1 E* IL VALORE DEL 
9945 IF Ns>F1 THEN Ri=R1+1 
9960 NEXT J,I 

9965 RETURN 


FOR J=1 TO R9 


PEZZO GIUSTO NELLA FOSIZIONE 1,3 


(1b) 


valore dello schema (R1)=0 
for ogni riga I 
for ogni colonna J 


9900 
9910 


9915 Q = valore ASCII della I, col. J dello schema E$ 
9920 if il pezzo non è “.” (Q # 46) 
traduci il pezzo Q nel valore “vero” N 
9935 PI = valore del pezzo nella riga I, col. J nella meta 
9945 if pezzo corrente # valore della stessa posizione nella meta 
nuovo valore di schema = vecchio valore + 1 
end if 
end if 
9960 end del ciclo for con variabile J 


end del ciclo for con variabile I 
return 


Listato 1: L'algoritmo “out of place”. Il listato la dà l'algoritmo in Basic come va 
implementato, inserito nel programma SEARCH della parte 1; il listato Ib mostra la 
versione in pseudolinguaggio. In questi listati, ed in quelli seguenti, il valore di ogni 
pezzo come stringa è sostituito con il corrispondente valore numerico (cioè il pezzo “1” 
ha valore 1), con le lettere da “A” ad “F” rappresentate dai valori da 10 a 15, rispettiva- 


mente. 


&(n)=g(n); ci si riferisce formal- 
mente alla condizione che garanti- 
sce questo risultato chiamandola 
ipotesi di consistenza. Tutti gli al- 
goritmi accettabili usati in questo 
articolo soddisfano tale ipotesi. 


Alcuni esempi 


I metodi esaustivi di ricerca esa- 
minati nella prima parte di questo 
articolo (breadth-first, depth-first e 
depth-first limitato) sono tutti ac- 
cettabili e rappresentano uno dei 
due estremi dello spettro delle in- 
formazioni: non forniscono infor- 
mazioni euristiche per la soluzione 
del problema, cioè 4(n)=0. L’al- 
tro estremo, relativo ad informa- 
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zioni complete (A(n)=h(n)), pur 
essendo teoricamente interessante, 
è in molti casi impossibile da im- 
plementare. Analizzeremo due al- 
goritmi accettabili che si situano 
tra questi due estremi. 

Ricordate che stiamo cercando 
di definire una funzione f(n) che è 
un limite inferiore al numero mini- 
mo di tappe da un nodo n alla me- 
ta G. Un algoritmo plausibile è il 
seguente (vedi listato 1): f(n) sia 
uguale al numero di quadratini che 
non sono nella posizione che occu- 
pano nella meta G. (Nei giochi 
dell’8 e del 15 usati come esempio, 
c'è un’unica meta G). La ragione 
per cui questo è un limite inferiore 
al costo effettivo del percorso ver- 


so la meta è questa: se uno dei 


quadratini (escluso lo spazio vuo- 
to) è fuori posto, si impiegherà al- 
meno una mossa, se non di più, 
per metterlo in ordine; così l’h(n) 
generato da questo algoritmo “out 
of place” sarà sempre minore o 
uguale del costo di una soluzione 
h(n). 

La tavola la mostra gli schemi 
usati in questo articolo; la tavola 
1b illustra i risultati ottenuti appli- 
cando a questi schemi gli algoritmi 
breadth-first e “out of place”. Il 
confronto delle prime sette righe 
della tavola 1b suggerisce diverse 
considerazioni. Per prima cosa, il 
metodo breadth-first è notevol- 
mente meno efficiente dell’algorit- 

o “out of place”; il computer che 
ho usato, che dispone di 20K byte 
di memoria e può considerare 52 
nodi prima di andare in overflow, è 
in grado di completare al massimo 
uno schema da quattro mosse col 
primo metodo, mentre col secondo 
può portare a termine anche alcuni 
schemi da dodici mosse. In secon- 
do luogo, entrambi gli algoritmi 
mostrano un incremento approssi- 
mativamente lineare in un certo 
range (livelli 1-3 e 1-4, rispettiva- 
mente) del numero di nodi estesi, 
col rapporto tra i nodi estesi e il 
numero minimo teorico di nodi da 
estendere rispettivamente di 3-1 e 
11. 

Inoltre, questo rapporto cresce 
progressivamente anche fuori del 
range di linearità degli algoritmi; 
questo implica che la massima effi- 
cenza raggiungibile da ogni algorit- 
mo decresce con la complessità del 
problema — in altre parole, quan- 
do lo schema diventa più involuto, 
il valore di 4 calcolato si allontana 
sempre di più dall’% teorico andan- 
do verso il valore zero (nessuna in- 
formazione), e il rendimento del- 
l’algoritmo peggiora (cioè si avvici- 
na a quello di una ricerca esausti- 
va). 

Un’osservazione conclusiva è 
che gli schemi (n,1) sembrano più 
facili da risolvere degli (r,3). (Gli 
schemi con l’ultimo indice uguale 
sono estensioni l’uno dell’altro.) 
Questa affermazione è avvallata 
dal confronto dei numeri nella co- 
lonna “nodi estesi” della tavola 1b 
(che è un metro della difficoltà del 


123 123 
AMITTNE 45 6 
758 78 
123 1062003 
3 ANG 5 6 
758 478 
123 12063 
746 5. 6 
NISSG 478 
12063: N26 
746 576 
5. 8 4.8 
123 10203 
746 57 6 
5 8 IRA, a 
LAO 12008, 

7 TEANO SIZAN, 
5 8 6 486 
Ta n62/003 

8 VARIA BRL? 
5 8 6 486 
Miantia aulico 

10 VOGA 527 
5 8 6 486 
TIRA Tar 

12 AIDA RETTO 
5 8 6 486 
TAO Mad 
284 5 82 
56. 46 
n Ae PRETI 
283 182 
56 4 5 4 6 
781 387 
2a; data 
564 54 6 


problema poiché è in relazione col 
numero di nodi estesi nella ricerca 
di una soluzione). Si noti ancora 
che l'aumento non lineare della co- 
lonna dei “nodi estesi” è maggiore 
per gli schemi (r.,3). Ciò suggerisce 
che l’andamento di un algoritmo 
fuori del range di linearità di cui 
abbiamo parlato non può essere 
rappresentato da una funzione non 
lineare semplice, ma da un insieme 
di valori che varia sensibilmente a 
seconda del particolare schema in 
questione. 


Te 


(1b) 
o Breadth-First “Out-of-Place” 
Nodi non Nodi Nodi non Nodi 

Schema estesi estesi Totale estesi estesi Totale 
(1,1) 3 1 4 3 1 4 
(2,1) 7 4 11 5 2 7 
(2,3) 4 3 7 3 2 5 
(3,1) 9 8 17 6 3 9 
(3,3) 10 9 19 4 3 7 
(4,1) 12 11 23 6 4 10 
(4,3) 16 21 37 6 4 10 
(5,1) *OM* (29) *OM* 9 7 16 
(5,3) *OM* n) 6 13 
(6,1) *OM* 12 9 21 
(6,3) *oM* 13 13 26 
(7,1) *OM* 13 10 23 
(7,3) *OM* 17 17 34 
(8,1) *OM* 14 11 25 
(8,3) *OM* 25 26 51 

(10,1) *OM* 14 13 2, 
(10,3) *OM* OM 
(12,1) *OM* 20 20 40 

(12,3) *oM* SOM 


Tavola 1: Confronto tra gli algoritmi breadth-first e “out of place” relativamente a 
problemi particolari. Gli schemi nella tavola la possono venir identificati da una cop- 
pia di numeri: la riga e la colonna in cui si trova lo schema. Il numero di riga corri- 
sponde al numero di mosse verso la soluzione; gli schemi nella stessa colonna sono 
sottoinsiemi dello stesso problema. (Corrisponde all’elenco di schemi dato nella prima 
parte dell'articolo.) La tavola 1b propone un confronto tra gli algoritmi breadth-first e 
“out of place” su problemi scelti. La relazione che lega i nodi estesi a quelli non estesi è: 
totale = nodi estesi + nodi non estesi. (*OM* significa che è stato superato il limite di 
50 nodi. Le parentesi attorno a 29 nella riga (5,1) mostrano che la ricerca breadth-first 


conduce a un overflow dopo aver esteso 29 nodi.) La capacità dell'algoritmo “out of 
place” di risolvere problemi più complessi con la stessa quantità di memoria denuncia la 


minor potenza del metodo breadth-first. 


Algoritmo di minima distanza 


L’algoritmo di minima distanza 
qui descritto è il più efficente tra 
quelli con cui ho lavorato — e non 
sono riuscito a migliorarlo neanche 
lasciando cadere il vincolo di accet- 
tabilità. L'algoritmo (listato 2) può 
essere descritto così: per ogni pez- 
zo nello schema (escluso il pezzo 
“.”), al valore dell’algoritmo ven- 
gono sommati il numero di righe e 
il numero di colonne di cui il pezzo 
dista dalla sua posizione finale nel- 


la meta (ignorando gli altri pezzi). 
Ad esempio, se il pezzo “1” è nella 
riga 2, colonna 3, allora dista 
(2-1) + (3-1)=3 quadratini dal- 
la posizione finale nella meta (riga 
1, colonna 1) e perciò si aggiunge 3 
al valore f di quello schema. La ta- 
vola 2 mostra il valore dello sche- 
ma (6,1) con questo algoritmo. 
Poiché la figura data è per ogni 
pezzo una stima moderata di quan- 
te mosse siano necessarie per met- 
terlo in ordine (sarebbe più alta se 
si tenesse conto degli altri pezzi), 
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(a) 


9885 

9887 

9890 

9893 

9899 

9900 

9910 FOR I=i TO R9: FOR d=1 TO R9 

9915 O=ASC(E$(I,J)) 

9920 IF Q=46 THEN 9960 

9925 4 THEN N=0-55: GOTO 9935 

9930 57 THEN N=0Q-48 

9935 I1=INT((N-1)/R9)+1 

9940 REM DATO IL QUADRATO N, CON 1c=N=15 TROVA 

9941 REM <‘I1,J1)=POSIZIONE DI N NELLO SCHEMA RISOLTO 

9945 Ji=N-R9*X(I1-1) 

9950 REM H-CAFPELLO E° LA SOMMA DELLE DISTANZE DI OGNI QUADRATO 
9951 REM DALLA FOSIZIONE NELLA META; IL QUADFATO ©.° NON CONTA 
9955 Ri=R1+AEBS(I-11)+AES(J-J1) 

9960 NEXT J,I 

9965 RETURN 


(2b) 


9900 valore dello schema (R1) = 0 
9910 for ogni riga I 
for ogni colonna J 
9915 i: Q= valore ASCII della riga I, col. J dello schema E 
9922 :  ifilpezzo nonè “.” (Q # 46) 
f traduci il pezzo Q nel valore “vero” N 
9935 : 1: I1= #diriga del pezzo nella meta 
9945 : 1. J1= # di colonna del pezzo nella meta 
9955 : 1. muovo valore dello schema = vecchio valore + 
(differenza dei valori di riga) + (differenza dei valori di colonna) 
9960 : end delciclo for con variabile J 
end del ciclo for con variabile I 
9965 return 


Listato 2: L'algoritmo di minima distanza. Il listato 2a dà l’algorigmo in Basic, pronto 
per essere inserito nel programma SEARCH della parte 1; il listato 2b è la traduzione in 
pseudolinguaggio. 


(a) ©) 

Schema Mosse mancanti 
pezzi 1, 2,3, 6,8 a posto 
pezzo 4 a 0 righe, 1 col. 
pezzo S a 1 riga, 1 col. 
pezzo 7 a 1 riga, 0 col. 


=0 
=1 
=2 
=1 

4 


f, valore dello schema 


Il 


Tavola 2: Calcolo dello schema (6,1) con l'algoritmo di minima distanza. Questo algo- 
ritmo somma la distanza di ogni pezzo dalla sua posizione finale (la meta) per ottenere 
una stima sul numero di mosse della soluzione. La colonna (a) è il problema rappre- 
sentato dallo schema (6,1); la colonna (b) è la meta; la colonna (c) elenca i contributi di 
ogni pezzo al numero totale di mosse necessarie per risolvere lo schema (il pezzo “.”, 
rappresentante lo spazio vuoto, non è considerato nel calcolo). 
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1°f calcolato come somma di questi 
valori deve rappresentare un limite 
inferiore sul vero costo f associato 
ad ogni schema; quindi questo al- 
goritmo di minima distanza è ac- 
cettabile. 


La tavola 3 illustra i risultati ot- 
tenuti da questo algoritmo applica- 
to agli schemi della tavola 1, con- 
frontati con i valori forniti dall’al- 
goritmo “out of place”. I risultati 
sono molto migliori di quelli otte- 
nuti con gli altri algoritmi conside- 
rati — in effetti è il primo algorit- 
mo utilizzabile in casi reali. Que- 
sto, come già il metodo “out of 
place”, è “completo” (sebbene si 
possa trovare un controesempio), 
ma si noti che la crescita non linea- 
re nella colonna “nodi estesi” per 
l’algoritmo di minima distanza è 
più graduale ed approssima meglio 
un andamento rettilineo che non 
nel caso del metodo “out of place”. 

Sebbene anche nel primo caso ci 
si allontani dal valore teorico 4 per 
avvicinarsi a zero quando aumenta 
la complessità del problema, ciò 
avviene meno bruscamente che per 
l’algoritmo “out of place”; e questo 
è dovuto alla maggior quantità di 
informazioni possedute dall’algorit- 
mo di minima distanza, che si ri- 
flette nella generazione di un nu- 
mero minore di nodi sbagliati ri- 
spetto alla soluzione di uno sche- 
ma. 


Tuttavia, sotto un certo aspetto, 
la tavola 3 è fuorviante: i valori 
della colonna “nodi estesi” per gli 
schemi di ordine 12, 14 e 16 sono 
identici per due insiemi di schemi 
che, come abbiamo visto, non han- 
no le stesse complessità, il che po- 
trebbe suggerire che l’algoritmo 
minimizzi in qualche modo l’effetto 
dispersivo causato dalle diverse 
complessità di schemi dello stesso 
ordine, postulate precedentemen- 
te. Ma non è così: la soluzione con 
l’algoritmo di minima distanza di 
un numero di schemi di ordine 12 
scelti casualmente mi ha assicurato 
che questa tendenza minimizzante 
in effetti non c’è; i valori della co- 
lonna “nodi estesi” per questi sche- 
mi sono 12, 13, 14, 14, 18, 20 e 


“Out-of-Place” 


Schema Nodi estesi 
(1,1) 


(2,1) 
(2,3) 


(3,1) 
(3.3) 


(4,1) 
(4,3) 


(5.1) 
(5.3) 


(6.1) 
(6.3) 


(7,1) 
(7,9) 


(8,1) 
(8,9) 


(10,1) 
(10,3) 


(12,1) 
(12,3) 


(14,1) 
(14,9) 


(16,1) 
(16,3) 


(18,1) 
(18,3) 


Totale 


Minima distanza 
Nodi estesi Totale 


Tavola 3: Confronto dell'algoritmo “out of place” col metodo di minima distanza per 


problemi selezionati. 


>20 (quest’ultimo valore è dato 
dal superamento della disponibilità 
di memoria del computer). 


Nonostante la normale affidabili- 
tà dell’algoritmo di minima distan- 
za, esiste un tipo di problema per il 


quale è praticamente inefficace. 


Un esempio di tale schema è dato 
nella figura 2, ed un’analisi dell’in- 
capacità dell’algoritmo di risolverlo 
ci fornisce lo spunto per la costru- 
zione di un algoritmo accettabile 
più potente. 


Anche se l’algoritmo assegna al- 
lo schema un valore quattro, io 
non sono stato capace di trovare (a 
mano) una soluzione con meno di 
sedici mosse, ed i primi cinquanta 
nodi dell’albero, che il mio calcola- 


tore è riuscito a generare prima di 
andare in overflow, non hanno mo- 
strato un apprezzabile avvicina- 
mento alla meta. Infatti, dopo aver 
generato i nodi da 37 a 40, al livel- 
lo 10 (figura 2), l’algoritmo li lascia 
perdere per estendere i nodi dei li- 
velli da 2 a 4, il che significa evi- 
dentemente che l’algoritmo ha giu- 
dicato non promettenti i nodi dei 
livelli dal 6 al 10. Sebbene io non 
abbia trovato un algoritmo accetta- 
bile che risolva meglio questo sche- 
ma, sono sicuro che tale metodo 
dovrà tener conto del numero ex- 
tra di mosse che generano i pezzi 
in posizioni “opposte” rispetto a 
quelle occupate nella meta (in que- 
sto caso il “5” e il “6” e poi il “7” e 
P*85), 


Algoritmi non accettabili: teoria 


Si sa relativamente poco sulle 
prestazioni degli algoritmi non ac- 
cettabili — cioè di algoritmi per cui 
il valore 4 non è necessariamente 
un limite inferiore al costo effettivo 
h di una soluzione. Questo perché 
non sono stati trovati aspetti comu- 
ni (relativi alle prestazioni degli al- 
goritmi di ricerca di una meta) che 
possano riguardare gli algoritmi 
non accettabili come un’unica clas- 
se: un certo algoritmo non accetta- 
bile, confrontato con un buon me- 
todo accettabile, può comportarsi 
molto meglio o molto peggio. Si 
può trovare addirittura un algorit- 
mo non accettabile meno efficiente 
di un metodo breadth-first “senza 
informazioni”. 


Ad ogni modo, due caratteristi- 
che degli algoritmi non accettabili 
discendono direttamente dal fatto 
che non verificano le condizioni di 
accettabilità. La prima è che non è 
sicuro che trovino una meta; l’altra 
è che una meta trovata con un al- 
goritmo non accettabile può non 
essere una meta ottimale (cioè può 
esistere un altro cammino, più bre- 
ve, verso lo stesso nodo). Questi 
svantaggi sono importanti ma non 
decisivi all’interno di un problema 
reale, perché, per prima cosa, un 
certo algoritmo non verrà mai usa- 
to se non si sa per esperienza che è 
adatto a risolvere problemi di quel 
tipo. (Gli algoritmi non accettabili 
vengono individuati con procedure 
di prove ed errori, e l’unica misura 
della loro efficenza è la capacità o 
meno di produrre soluzioni a pro- 
blemi di uguale complessità di cui 
si conoscano già i risultati.) In se- 
condo luogo, la produzione di un 
nodo ottimale può non essere im- 
portante come quella di una meta, 
sia essa o no ottimale. 


(Altri metodi possono essere 
usati assieme o al posto di algorit- 
mi non accettabili per produrre 
una meta. Tutti questi metodi ri- 
nunciano alla sicurezza di trovare 
una meta pur di risparmiare sul nu- 
mero di nodi intermedi da memo- 
rizzare. I successori possono essere 
tolti dalla memoria quando vengo- 
no generati o quando essa è stata 
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REM ALGORITMO NA-I: 
REM ISTRUZIONI: 


NON ACCETTABILE 
AGGIUNGERE QUESTO AL LISTATO 2 


REM L’ALGORITMO DELLA MINIMA DISTANZA 


L1=100-R1 


9890 
9891 
9892 REM ALGORITMO NA-]I: 
9895 REM 

9896 REM ISTRUZIONI: 
9898 
9899 
9955 
9997 


I9=AEBS(I-I1): J9=5BS(I-d1): 


riempita; oppure, con un approccio 
completamente differente, si può 
sviluppare attraverso l’albero una 
ricerca depth-first con livello mas- 
simo fissato, che memorizzi solo il 
miglior nodo incontrato fino a quel 
punto.) 


Livello 0 


Livello 1 


Livello 2 


Livello 10 


R 
IF I9%0O AND J9%0 THEN-R1=R1+1 


LISTATO 4--------—----—-- 
NON ACCETTABILE 


AGGIUNGERE QUESTO AL LISTATO 2 


1+19+39 


Alcuni esempi 


È facile trovare un esempio di 
algoritmo non accettabile cattivo: 
basta sottrarre il valore calcolato 
dall’algoritmo di minima distanza 
(che è un buon algoritmo) da un 


Fig. 2. Un esempio di problema che non può essere risolto efficacemente 
con l’algoritmo di minima distanza. Sebbene l’algoritmo dica che bastano 
quattro mosse per trovare la soluzione, il computer supera la disponibilità 
di memoria prima di riuscirvi. Il numero nel tondino accanto ad ogni nodo 
indica l’ordine in cui i nodi sono stati generati; i numeri senza cerchietto 


sono i valori f calcolati dall’algoritmo. 
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Listato 3: La modifica necessaria per im- 
plementare l'algoritmo NA-I (primo algo- 
ritmo non accettabile). Questa modifica 
al programma Basic del listato 2 fornisce 
false informazioni al programma 
SEARCH, rendendolo inefficace anche di 
fronte ai problemi più semplici. 


Listato 4: La modifica necessaria per ot- 
tenere l’algoritmo NA-II (secondo algori- 
tmo non accettabile). Inserita nel pro- 
gramma Basic del listato 2, fornisce pre- 
stazioni uguali o migliori del metodo di 
minima distanza. Poiché si tratta di un al- 
goritmo non accettabile, il successo non è 
garantito. 


numero grande arbitrario. Si ottie- 
ne così un algoritmo che assegna 
un valore alto ad un nodo vicino 
alla meta (cosicché sarà uno degli 
ultimi ad essere esteso) ed un valo- 
re più basso ad ogni nodo che dista 
di più dalla meta; si veda l’algorit- 
mo NA-/, nel listato 3. Questo me- 
todo, di fronte a problemi di ordi- 
ne 2 o più, riempie lo spazio di me- 
moria di quasi tutti i computer pri- 
ma di ottenere una soluzione, per- 
ché estende un nodo “buono” solo 
dopo aver esteso tutti quelli sba- 
gliati nell’albero del problema. Do- 
po cinquanta nodi (il massimo per 
il mio calcolatore) del problema (2, 
1), l’algoritmo era molto più lonta- 
no dalla soluzione di quanto non lo 
fosse all’inizio. 

Viceversa, è abbastanza difficile 
trovare un algoritmo non accettabi- 
le buono — cioè che si comporti 
meglio dell’algoritmo di minima di- 
stanza. Infatti è necessaria una 
gran quantità di lavoro in parec- 
chie direzioni per ottenere anche 
un solo risultato positivo. L’algorit- 
mo chiamato NA-I/ (listato 4) è un 
tentativo di migliorare quello di 
minima distanza nella risoluzione 
di problemi più difficili, aggiungen- 
do 1 al valore originale di ogni no- 
do che disti almeno una riga e una 
colonna dalla sua posizione nella 
meta. Solo riguardo a due schemi 
si ottengono risultati migliori che 
con l’algoritmo di minima distanza 
(vedi la tavola 2), ma per gli altri le 
prestazioni sono uguali, ed in tota- 


Fig. 3. L’estensione dello schema (5,1) secondo gli algoritmi di minima 
distanza (figura 3a) ed NA-II (figura 3b). I numeri all’interno di ogni nodo 
suggeriscono l’ordine in cui sono stati generati; i numeri all’esterno del 
cerchietto sono i valori stimati di f, calcolati da ogni algoritmo. In questo 
caso, l’algoritmo non accettabile offre una prestazione migliore. 


Glossario 


Albero del problema: una rappresentazione grafica dello spazio del problema (0 
spazio degli stati) che si serve di punti per rappresentare gli stati e di linee tra i punti 
per la transizione da uno stato a quello seguente; tutti i nodi devono essere generati 
dal nodo di partenza S, lo stato iniziale del problema. 

Algoritmo d’ordinamento: una formula o una procedura per generare un valore 
d’ordine che classifichi la probabilità del relativo nodo di essere scelto per l’esten- 
sione; il nodo con numero d'ordine minore sarà il primo ad essere esteso. 

Costo (o valore): un valore numerico associato al cammino minimo dal nodo ini- 
ziale S al nodo in questione n; il costo della prima meta che si trova sarà particolar- 
mente importante all'interno del problema da risolvere. 

Estendere: calcolare tutti i successori del nodo in questione. 

Livello: i! numero di nodi di cui un certo nodo dista da quello iniziale S. 

Meta: qualsiasi nodo soddisfacente l'insieme di condizioni definite come obiettivo 
del problema. 

Nodo: elemento di un albero, rappresentante un certo stato del problema. 

Nodo esteso: un nodo i cui successori sono già stati calcolati. 

Nodo non esteso: un nodo che non è ancora stato considerato per essere esteso. 
Rappresentazione dello spazio degli stati: /a riduzione del problema nelle seguenti 
componenti: le variabili di stata che possono descrivere il problema in tutte le sue 
possibili configurazioni; gli operatori che generano il prossimo insieme di valori (0 
stati) per il problema a partire dall’insieme di stati corrente; un nodo iniziale S; ed 
una descrizione (non necessariamente esatta) della meta da trovare. 

Stati: un insieme specifico di valori per le variabili che definiscono il problema. 
Successori: i nodi rappresentanti tutti i “prossimi stati” di un nodo (0 stato) dato, 
generati dagli operatori della rappresentazione dello spazio degli stati; il nodo che 
genera i successori è chiamato padre. 


le l'algoritmo NA-// è dunque mi- 
gliore. 


Le figure 3a e 3b mostrano l’e- 
stensione del problema (5,1) con 
gli algoritmi di minima distanza ed 
NA-II, rispettivamente, l’ordine in 
cui i nodi si sono estesi ed il valore 
della stima % per ciascun algorit- 
mo. Si noti che l’idea buona del- 
l’algoritmo NA-I/ consiste nel non 
estendere il nodo 3, mentre il me- 
todo di minima distanza, sottosti- 
mando il suo costo (che in realtà è 
5), lo ha calcolato invano. Vedia- 
mo perciò che NA-I/, almeno in 
questo caso, è migliore dell’algorit- 
mo di minima distanza, perché è 
meno propenso a sottostimare il 
valore dei nodi (che è una tenden- 
za degli algoritmi accettabili). Inol- 
tre, questo metodo si conferma 
non accettabile, giacché dà talvolta 
stime superiori al valore dei nodi 
(cosa che un algoritmo accettabile 
non può fare). Il nodo 2 della figu- 
ra 3b è un esempio di 
“sovrastima”: il suo vero valore è 
6, ma la stima dell’algoritmo NA-I/ 
è 8. 


Osservazioni e discussione 


Finora abbiamo usato la parola 
“costo” solo per riferirci al valore 
numerico associato al percorso mi- 
nimo da un nodo alla meta più vici- 
na. Ma il costo di una soluzione 
può avere altri due importanti si- 
gnificati. Un indice del costo di 
una soluzione è il numero di nodi 
estesi dall’algoritmo — è il metro 
che abbiamo usato per confrontare 
l'efficienza di due algoritmi. Ma un 
altro fattore deve essere considera- 
to, oltre alla velocità e alla spesa 
(espressa in tempo di calcolo). Si 
tratta della complessità del calcolo 
della funzione h. Un algoritmo con 
più informazioni, pur generando 
meno nodi, può impiegare per que- 
sto calcolo molto più tempo. Se la 
velocità o la spesa diventano fattori 
critici prima della quantità di me- 
moria disponibile, è possibile che 
l’utente decida di usare l’algoritmo 
con meno informazioni. 

— (Domanda 1) Come affronta la 
ricerca su alberi un algoritmo euri- 
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Fig. 4. Un’estensione parziale ipote- 
tica ad albero, utilizzata per visua- 
lizzare alcune domande del testo. 


stico? (Troverete le soluzioni nel 
riquadro “Risposte”). 

— (Domanda 2) Nella descrizione 
dell’algoritmo di minima distanza 
lo spazio vuoto non era considera- 


to nella somma delle “distanze dal- 
la posizione giusta”. Se invece se 
ne tenesse conto, l’algoritmo di- 
venterebbe più potente? O meno 
potente? Sarebbe ancora accettabi- 
le? 

— Si può avere un albero come 
quello in figura 4 per un algoritmo 
accettabile? Sì, ma solo se l’algorit- 
mo sbaglia la stima del valore di 
uno dei nodi non estesi (4, 5, 7 o 
8). Per esempio, se la meta ottima- 
le dista tre nodi dal nodo 4, allora i 


successori del nodo 8 (0, al più tar- 
di, i loro successori) danno ad A 
valori maggiori di 3, cosicché il no- 
do 4 sarà il primo ad essere esteso. 
Un algoritmo accettabile raggiun- 
gerà sempre prima la meta più vici- 
na. 

— Questo stesso albero può ri- 
guardare un algoritmo non accetta- 
bile? Sì, un algoritmo non accetta- 
bile non pone restrizioni alla validi- 
tà di questo albero. 

— (Domanda 3) Ricordate il si- 
gnificato di f, é ed h: f(n) è una sti- 
ma della distanza dal nodo di par- 
tenza S alla meta più vicina, pas- 
sando per n; é(n) e h(n) sono stime 
per le distanze da S ad n e da n alla 
stessa meta, rispettivamente. Forse 
che l’albero in figura 4 è una buona 
ragione per usare f al posto di È 


nell’ordinare l’estensione dei nodi? 
— (Domanda 4) L’algoritmo di 
minima distanza si è rivelato il mi- 
gliore per il gioco dell’8 e del 15. 
Provate ad aggiungere la riga 


9963 RIl=RI* F9 


alla subroutine per il calcolo di À 
della riga 9900. Si aumenterà così il 
valore 4 per i nodi che sono stati 
precedentemente sottostimati dal- 
l’algoritmo accettabile. L'algoritmo 
diverrà non accettabile, ma sarà 
anche più “penetrante”? Provare 
con F9= 1.01, 1.1, 1.5 (e con altri 
valori) e sperimentate il nuovo al- 
goritmo con schemi di otto mosse o 
più. 

— (Domanda 5) Perché l’algorit- 
mo non accettabile NA-/ è peggio- 
re del metodo breadth-first? Un al- 
goritmo di ricerca esaustiva privo 
di informazioni euristiche non è 
forse il metodo di ricerca meno ef- 
ficente? ; 

— Come ho già detto, talvolta è 
utile affiancare ad un algoritmo 
non accettabile alcune varianti al 
metodo di ricerca. In certe situa- 
zioni, l’applicazione razionale di 
uno di questi metodi può essere 
più efficace, ai fini della ricerca di 
una meta, dei metodi “puri” de- 
scritti nell’articolo. 


Conclusioni 


In questo articolo abbiamo trat- 
tato la ricerca su alberi e grafi rap- 
presentanti uno spazio degli stati. 
Altri tipi di alberi (gli alberi AND/ 
OR e gli alberi di strategia nei gio- 
chi, per citarne due) si incontrano 
nelle dimostrazioni di teoremi e 
nello sviluppo di giochi, e ad essi 
sono collegati moltissimi problemi. 

Ad esempio, come si possono 
valutare gli algoritmi non accetta- 
bili? Quali modifiche richiede la li- 
mitatezza di spazio in memoria? 
Siccome la quantità di intelligenza 
artificiale che si incontra in un pro- 
gramma richiede almeno il triplo in 
termini di quantità di lavoro; spero 
proprio che questo articolo stimoli 
qualcuno ad approfondire (e dif- 
fondere) questa affascinante mate- 
ma. 


Risposte 


1. Un algoritmo euristico affronta la ricerca su alberi sulla base di informazioni sullo stato corrente (cioè sul nodo in questione, 
senza preoccuparsi della sua relazione con nodi diversi dalla meta) per valutare la possibilità che quel nodo guidi alla soluzione. 
Ai nodi con più probabilità viene assegnato un valore più basso, cosicché il programma di controllo, scegliendo di estendere il 
nodo col valore d'ordine più basso, considera proprio quello che probabilmente porterà alla soluzione più breve. 
2. La variante nel metodo di minima distanza è meno efficace anzitutto perché non è più accettabile. Lo schema 


N26) 
456 
CARS, 


è un semplice controesempio. Poiché sia “.” che “8” distano un quadratino dalla loro posizione nella meta, l'algoritmo calcolerà 
il valore 2. Tuttavia, siccome il vero valore della soluzione è 1, basta questo controesempio per dimostrare la non accettabilità 


dell’algoritmo. 


3. Se l’ulgoritmo utilizzato è accettabile, l’uso di fi garantisce di trovare la meta più vicina — ciò è matematicamente indiscutibile. 
Ma se l’algoritmo è non accettabile e, al tempo stesso, relativamente buono, l’uso di 


fm=tg@+h@m 


può proprio essere una buona idea. Se le stime dei costi hi della figura 4 sono esatte una rispetto all'altra, allora 


f (nodo 4) = 1+f (nodo 4) 
=1+3=4 


e il nodo 4 verrà perciò esteso prima. 


f (nodo 8) = 3 + fi (nodo 8) 
=3+2=5 


4. I risultati di questo nuovo algoritmo saranno identici a quelli dell’algoritmo di minima distanza, pur essendo il primo non 
accettabile. Moltiplicando i risultati per una costante, cambieranno i valori dei nodi, ma non l'ordinamento reciproco. D'altro 


canto, aggiungendo 


9963 IF R1>F8 THEN RI = RI + F9 


oppure 


9963 IF R1<F8 THEN RI = R1+ F9 


si modificherà la relazione tra i nodi. Provate anche con altri valori di F8 e F9; suggeriamo 4 come valore iniziale per F8. 
5. Non è vero. Avere informazioni sbagliate è peggio che non averne affatto, ed è proprio il caso di NA-I. Assegnando valori alti 
a nodi che dovrebbero averli bassi, e viceversa, l'algoritmo fa sì che il programma estenda prima i nodi meno promettenti. 


La Potenza dei Microprocessori 


Questi due libri sono stati ideati come testi autonomi e completi per 
imparare la programmazione in linguaggio Assembler. usando lo Z80 0 
pri forse più diffusi) 

. non richiedono alcuna conoscenza di base ne di 
di programmazione 


elettronica generale r 
Sono stati progettati, infatti, sotto forma di corso che 
sistematicamente, passo dopo passo, porta il lettore di 
fino alle tecniche di programmazione avanzate, al fine di permettergli 
la realizzazione di programmi sempre più complessi. 

L'esposizione progressiva, rigorosamente strutturi 
risoluzione obbligatoria di esercizi attentamente graduati al fine di 
verificare che sì sia veramente capito quanto presentato? Ben si 
prestano, perciò. a chi si avvicina per la prima volta ai microprocessori 
e ne vuole conoscere e capire gli aspetti essenziali di programmazione 
Per tutti coloro che già hanno programmato, invi rà una vera e 
propria miniera di informazioni sulle caratteristiche specifiche del 
microprocessore d'interesse, evidenziandone nel contempo, vantaggi e 
svantaggi 
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Come compattare un 
file, riducendo la 
quantità di spazio 
necessaria per 
memorizzarlo 


di J.L. Peterson 


La riproduzione di questo articolo 
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PERSONAL SOFTWARE 


La compressione 


dei testi 


n problema sempre presente 

| | in qualsiasi sistema è il rispar- 

mio di memoria. Non abbia- 

mo mai a disposizione memoria suf- 

ficiente per contenere tutte le infor- 

mazioni che vogliamo. E questo vale 

sia per i programmi in memoria cen- 

trale che per i dati su supporti ester- 
ni. 

Una semplice soluzione al proble- 
ma consiste nel comperare più me- 
moria. In particolare nel caso delle 
memorie esterne a supporti mobili 
come cassette, floppy disk, nastri 
magnetici ed anche nastri di carta, 
questi si possono comperare in 
quantità dipendente dalle necessità. 
Il limite alla quantità di memoria 
disponibile è dato allora da fattori 
economici. 

Un approccio alternativo consi- 
ste nello sfruttare meglio i mezzi a 
disposizione per la memorizzazio- 
ne. Ecco in cosa può essere ‘utile la 
compressione dei testi. L’idea con- 
siste nel ridurre la quantità di spa- 
zio necessaria per memorizzare un 
file, comprimendolo, cioè renden- 
dolo più breve. La compressione 
viene effettuata modificando la tec- 
nica di rappresentazione del file. 
La procedura di codifica è realizza- 
ta in modo da risultare reversibile; 
è possibile cioè effettuare una de- 
codifica per ottenere il file origina- 
le. Ciò è illustrato in figura 1. La 
speranza è che il file codificato sia 
più corto di quello originale, e che 
quindi si risparmi dello spazio. 


Il prezzo di questo guadagno di 
spazio è pagato in termini di tempo 
di elaborazione. È necessario del 
tempo addizionale per codificare e 
decodificare i file quando vengono 
elaborati. Tuttavia, bisogna notare 
che i microprocessori sono rara- 
mente limitati da questo punto di 
vista disponendo di solito di cicli 
d’elaborazione extra. 

In effetti il tempo totale d’esecu- 
zione di molti programmi sarà mi- 
nore per un file compresso, nono- 
stante la sua codifica. Questo per- 
ché il tempo dei passaggi di I/O 
(input/output) per un file compres- 
so è minore dello stesso tempo per 
un file non compresso, perché ci 
sono meno bit da leggere o scrive- 
re. Quindi i programmi limitati 
dall’I/O (come assemblatori e cari- 
catori) possono essere eseguiti più 
velocemente se i file sono compres- 
si. 

Il concetto che sta alla base della 
compressione dei testi consiste nel 
trovare il metodo di codifica che ri- 
chiede il minimo spazio. Sono stati 
elaborati parecchi algoritmi per la 
compressione dei testi, e noi ne 
presenteremo alcuni. In generale 
questi algoritmi funzionano con 
qualsiasi tipo di dati: numerici, 
stringhe di caratteri, ecc. Per gli 
scopi di questo articolo, comun- 
que, ci limitiamo ai testi, cioè alle 
stringhe di caratteri. Compresi na- 
turalmente i programmi, la docu- 
mentazione, le liste di indirizzi, i 


dati e molti altri file memorizzati 
all’interno dei calcolatori. Infatti, 
si possono comprimere anche i 
programmi oggetto, considerandoli 
semplicemente come stringhe di 
byte, ma l’operazione è molto deli- 
cata. 


La compressione dei testi è rea- 
lizzata tramite un’attenta analisi 
della rappresentazione dell’infor- 
mazione nel file compresso. In 
molti piccoli sistemi, per rappre- 
sentare i caratteri si usa il codice 
ASCII. Il vantaggio principale de- 
rivante dall’uso del codice ASCII è 
che si ottiene una rappresentazione 
standard e facile da definire. Il 
maggiore svantaggio è lo spreco di 
spazio. 

L’ASCII è un codice a 7 bit, 
mentre la maggior parte dei pro- 
cessori trattano byte da 8 bit. Così, 
1 bit su 8 (il 12.5%) viene sprecato 
semplicemente perché si usa un co- 
dice a 7 bit in un byte da 8 bit. 
Inoltre, gran parte dei codici di 
controllo vengono usati raramente, 
e molte applicazioni non richiedo- 
no l’uso di caratteri sia maiuscoli 
che minuscoli. Perciò di solito si 
può facilmente risparmiare un altro 
bit, ottenendo una riduzione dello 
spazio occupato di almeno il 25%. 
Gran parte degli algoritmi presen- 
tati qui possono sfruttare questi bit 
superflui per un risparmio di spazio 
‘ancora maggiore. 

Si noti tuttavia che questo ap- 
proccio richiede una descrizione 
del modo in cui il file compresso 
deve essere rappresentato. Questa 
descrizione è data normalmente 
dalla routine di codifica e decodifi- 
ca. Il risparmio che si ottiene con 
la compressione del testo può esse- 
re valutato in contrapposizione al- 
l'aumento di tempo dovuto alle 
routine sia di codifica che di deco- 
difica. Inoltre, tipi diversi di file si 
prestano ad essere codificati me- 
glio con metodi differenti, e quindi 
possono essere necessarie. parec- 
chie routine diverse di codifica e 
decodifica. 


I trailing blank ed il tab 


Un primo semplice passo nella 
compressione dei file di testi (ma 
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Fig. 1. Processo di compressione di un testo. 


non di codici oggetto) consiste nel- 
l’eliminare i blank che si trovano 
alla fine della riga prima dei carat- 
teri di ritorno del carrello e di capo 
riga. Questi vengono chiamati trai- 
ling blank. In sistemi che memoriz- 
zano grandi quantità di linguaggio 
compilato, programmi in Basic o 
Fortran, gran parte di ogni riga è 
composta da blank. Tutti i trailing 
blank possono essere cancellati 
senza che il significato del file risul- 
ti modificato. 

Per ridurre il numero di blank in 
qualsiasi punto di una riga, si può 
usare il tab. Particolarmente con 
programmi strutturati a blocchi, 
come Algol, Pascal o PL/1, o con 
linguaggi orientati a colonna, come 
il Fortran o il linguaggio assem- 
bler, il tab può essere molto utile 
nella compressione dei testi. Posso- 
no essere usate tecniche di tabula- 
zione di due tipi. Una è chiamata 
tabulazione fissa. In questo caso, la 
tabulazione è effettuata ogni n co- 
lonne, dove n è una costante fissa 
del sistema. Di solito n = 8, sebbe- 
ne alcuni studi abbiamo mostrato 
che n=4 ed n= 5 dovrebbero dar 
luogo ad un ulteriore risparmio. 
L’altra possibilità consiste nell’uti- 
lizzare una tabulazione variabile. 
In questo caso, per ogni file vengo- 
no fissate le lunghezze di tabulazio- 
ne. Ciò richiede una valutazione di 
quali siano le tabulazioni migliori 
(cioè quelle che producono la mi- 
glior compressione). Inoltre è ne- 
cessario specificare che tipo di ta- 


bulazione dev'essere usato per ogni 
file. Ciò si può fare semplicemente 
inserendo un elenco delle tabula- 
zioni possibili all’inizio di ogni file. 

Questo dizionario dovrebbe ser- 
vire per inizializzare le tavole per 
la routine di decodifica che dovreb- 
be rimpiazzare ogni tab con un nu- 
mero appropriato di blank. In que- 
sto modo si possono usare tabula- 
zioni diverse per linguaggi di pro- 
grammazione o insiemi di dati di- 
versi. 


Caratteri multipli 


La sostituzione dei trailing blank 
con tab serve per comprimere 
stringhe di caratteri blank multipli. 
In alcuni casi ci si può trovare di 
fronte alla ricorrenza frequente di 
stringhe di caratteri multipli diversi 
dal blank. Per esempio, le tecniche 
di disegno col computer richiedono 
spesso la memorizzazione di lun- 
ghe sequenze di caratteri identici, 
come nel caso della figura 2. L’idea 
è ora quella di sostituire una strin- 
ga di n caratteri identici con il nu- 
mero n ed un carattere, rispar- 
miando così n —2 caratteri. Il nu- 
mero può essere rappresentato in 
un byte. Se supera 256, può essere 
espresso come 256, seguito dal ca- 
rattere e da un altro numero e un 
altro carattere per il resto. 

La codifica consiste nel contare i 
caratteri identici finché non se ne 
trova uno diverso, per poi avere in 
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Fig. 2. Un file che può essere com- 
presso con tecniche particolarmente 
semplici. Il file originale è un’im- 
magine per video di 24 per 80, cioè 
1920, caratteri. Eliminando i trai- 
ling blank ed usando la tabulazione 
da 8 colonne, riduciamo la dimen- 
sione del file a 412 caratteri, con un 
risparmio del 78.6%. 


output il numero ed il carattere. La 
decodifica si occupa semplicemente 
di espandere il numero ed il carat- 
tere nella sequenza relativa. 

Ovviamente, perché la tecnica 
abbia successo n dev'essere mag- 
giore di 2. Se n fosse 1, questo me- 
todo in effetti raddoppierebbe la 
dimensione del file. Poiché questo 
è normale nei file di testi, in questi 
casi bisogna usare un approccio più 
sofisticato. 

Vogliamo sostituire con un nu- 
mero ed un carattere le sequenze 
di caratteri identici, tralasciando 
però i caratteri singoli o doppi. C'è 
il problema di rappresentare i ca- 
ratteri multipli in modo che il nu- 
mero non venga interpretato come 
un carattere. Una soluzione comu- 
ne è data dall’uso di una sequenza 
escape, che è un mezzo per indica- 
re che i caratteri che seguono de- 
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vono essere interpretati in un mo- 
do particolare. Per creare una se- 
quenza escape, si sceglie un carat- 
tere usato raramente (o meglio 
mai). Ad esempio, in ASCII si può 
usare uno dei codici di controllo o 
un carattere speciale. L’ASCII di- 
spone anche di un carattere esca- 
pe, ma nel caso che venga già usa- 
to per altri scopi, se ne può usare 
un altro. Dunque una sequenza di 
n caratteri identici sarà rappresen- 
tata dal carattere escape, il valore 
n ed il carattere ripetuto. La figura 
3 mostra il testo della figura 2 com- 
presso con questa tecnica. 

Ciò consente di rappresentare 
come al solito un testo normale, 
fatta eccezione per il carattere 
escape. Il problema che ci si pre- 
senta ora è quello di saper rappre- 
sentare il carattere escape, se è 
presente nel testo di input (non an- 
cora compresso). Se lo copiamo 
brutalmente nel file compresso, il 
decodificatore penserà (a torto) 
che si tratti dell’inizio di una se- 
quenza escape ed interpreterà i 
due caratteri seguenti come se rap- 
presentassero una sequenza di ca- 
ratteri identici (è lo stesso proble- 
ma che i progettisti di linguaggi 
trovano per la rappresentazione tra 
apici di una stringa contenente altri 
apici). Ci sono molti modi per ri- 
solvere questo problema: eliminare 
dal testo tutti i caratteri escape; 
rimpiazzare tutti i caratteri escape 
con una sequenza escape speciale, 
per esempio con un contatore 0; 
sostituire tutti i caratteri escape 
con un carattere escape, il numero 


$32 $3*$4 /**.@$30 /$85* \_ 56° \ @$30 57° $7*@$30 55° 
$3.59 /53* \ @$29 $4*\$7 $6*@529 $5°\ 
\@$43 \@$43 *@$43 *@$43 | 
"\**\$3.°'/53'@5$26'$6\ **/'@335°$3\ @$35\ */@$36\ 


$6°/.@$36 \$4* 
1$6* \ $6*/53*/" @$26/** 
*@$37\@$37\@ 


Fig. 3. Ulteriore compressione del 
file mostrato in figura 2, effettuata 
rimpiazzando i caratteri identici 
multipli con una sequenza escape. 
Questa nel nostro caso è data dal 
carattere $ seguito dal numero di ri- 
petizioni e dal carattere che deve es- 
sere ripetuto. Questo metodo è van- 
taggioso solo quando il numero di 
ripetizioni è maggiore di 2. Il nu- 


1 e un altro carattere escape, consi- 
derandoli come sequenze di lun- 
ghezza 1. 

Uno qualsiasi di questi metodi 
consentità di codificare e decodifi- 
care facilmente e correttamente 
qualsiasi file. 

Si noti che, per quanto riguarda 
la scelta del carattere escape, pos- 
siamo usare sempre lo stesso o sce- 
glierne uno diverso per ogni file. 
Se facciamo in quest’ultimo modo, 
dobbiamo scorrere preliminarmen- 
te il file per cercare un carattere 
che non venga mai usato. Poi lo in- 
seriamo all’inizio del file per per- 
mettere all’algoritmo di decodifica 
di riconoscere qual è il carattere 
escape usato. 


Sostituzione delle parole chiave 


Un tipo molto comune di file 
memorizzato nei computer è il file 
di un programma. A causa della lo- 
ro forma stilizzata e della loro sin- 
tassi, i programmi si prestano par- 
ticolarmente ad essere compressi. 
Intanto la memoria richiesta può 
essere ridotta sensibilmente con la 
tecnica di sostituzione dei trailing 
blank con il tab. Ma un ulteriore 
importante risparmio deriva dalla 
sostituzione delle parole chiave. 

Quasi tutti i linguaggi di pro- 
grammazione si servono di parole 
chiave o parole riservate: esempi in 
Fortran sono INTEGER, FOR- 
MAT, CALL; in Basic invece 
LET, READ, PRINT, REM e così 
via. Essendo usate più volte nel 
programma, queste parole sono le 
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mero normalmente è contenuto in 
un byte, ma qui è rappresentato in 
decimale. Il carattere @ rappresen- 
ta il ritorno del carrello ed il pas- 
saggio a capo riga. Il file di figura 2 
viene rappresentato in soli 287 ca- 
ratteri. Così si riduce il file al 
14.9% della sua dimensione origi- 
nale. 


prime candidate ad essere com- 
presse. 

Due sono i metodi più usati. Il 
primo consiste nel sostituire ogni 
parola chiave con una sequenza 
escape. Questa potrebbe essere da- 
ta dal codice escape, seguito da un 
numero che indichi qual è la parola 
chiave in questione. Questo meto- 
do offre il vantaggio di poter trat- 
tare tante parole chiave quanti so- 
no i numeri rappresentabili in 1 by- 
te, e può essere particolarmente 
utile per codici operativi simbolici 
di linguaggi assembler. 

Una tecnica alternativa consiste 
nel cercare tra i codici esistenti 
quelli che non vengono mai usati. 
Ad esempio, se si usa il codice 
ASCII, molti caratteri di controllo, 
alcuni caratteri speciali ed in certi 
casi anche i caratteri minuscoli non 
vengono solitamente usati. Se si 
usa l’ASCII a 7 bit con byte a 8 bit, 
allora il bit rimanente può servire 
per definire 128 nuovi codici inuti- 
lizzati. Questi vengono associati al- 
le parole riservate più comuni. 
Uno di essi corrisponderà ad un ca- 
rattere escape, per il caso in cui 
uno dei codici che non si pensava 
fossero usati compaia invece nel fi- 
le in input. In fase di codifica, ven- 
gono identificate le parole riservate 
presenti nel file in input e sostituite 
con il codice speciale relativo, co- 
me mostra la figura 4. Se si incon- 
tra uno dei codici speciali, lo si 
rappresenta con una sequenza a 2 
caratteri costituita dal codice esca- 
pe seguito dal carattere in input. 
Per quanto riguarda invece la de- 
codifica, tutti i codici speciali sono 
rimpiazzati dalle corrispondenti pa- 
role chiave, tranne quelli preceduti 
dal codice escape, che vengono co- 
piati direttamente in emissione. 

A questo punto emerge una que- 
stione. In ogni particolare linguag- 
gio c'è un numero fisso, e di solito 
abbastanza piccolo, di parole riser- 
vate, ma queste variano da lin- 
guaggio a linguaggio. Di conse- 
guenza può variare di molto la cor- 
rispondenza tra i codici speciali e le 
parole chiave. Nei sistemi con un 
unico linguaggio (per esempio in 
quelli che offrono solo il Basic) 
questo problema non si pone, ma 


READ A 

IF A=0 THEN 110 
IF A>O THEN 80 
LET B=-A 

LET R=SOQR(B) 


PRINT A,R,"$" 
GO TO 10 

LET R=SQR(A) 
PRINT A,R 

GO TO 10 

END 


Fig. 4. La compressione di un pro- 
gramma Basic con la sostituzione 
delle parole chiave. Le parole chia- 
ve (1) GO TO, (2) IF, (3) LET, (4) 
PRINT, (5) READ, (6) THEN e 
(7) END sono rimpiazzate da una 
sequenza escape formata dal carat- 
tere escape $ seguito dal numero as- 
sociato alla parola chiave. Si noti 


negli altri casi lo si deve prendere 
in considerazione. 

Sono possibili più soluzioni. In- 
tanto si possono usare ruotine di 
codifica e decodifica separate per 
ogni linguaggio, lasciando al pro- 
grammatore libertà di scelta. In se- 
condo luogo si può contrassegnare 
ogni file compresso con un byte 
che indichi se è un file in Basic, in 
Fortran, o nel linguaggio X. Allora 
si è in grado di dire al codificatore 
in che modo il file dev'essere codi- 
ficato, oppure è lui stesso che rico- 
nosce (o calcola) se si tratta di un 
file in Fortran, Basic o linguaggio 
X ed applica il giusto algoritmo di 
compressione. Il file compresso 
viene contrassegnato a seconda 
della codifica. Il decodificatore leg- 
ge il contrassegno ed applica il con- 
seguente piano di decodifica. 

Un terzo approccio è più genèra- 
le, ma teoricamente più dispendio- 
so. Ciò che varia negli algoritmi di 
codifica e decodifica per i diversi 
tipi di file è semplicemente la tavo- 
la delle relazioni tra parole chiave 
e codici carattere. Quindi, un altro 
metodo consiste nel premettere ad 
ogni file compresso un dizionario 
degli abbinamenti tra codici carat- 
tere e parole chiave. Questo elenco 
chiarisce il significato dei codici ca- 
rattere speciali indicando le parole 
chiave ad essi corrispondenti. 


che il carattere escape era presente 
anche nel programma originale, e 
quindi è stato rappresentato tramite 
una speciale sequenza escape $$. In 
effetti, tutti i blank che delimitano le 
parole chiave vengono inclusi in es- 
sa. Così la riga 10 diventa 10$5A, e 
$5 rappresenta “READ”. 


Abbreviazione delle sottostringhe 


L’idea di premettere un diziona- 
rio delle abbreviazioni all’inizio di 
un file compresso suggerisce di 
estendere il metodo di sostituzione 
delle parole chiave anche a file il 
tipo più generico. Il concetto è 
piuttosto semplice. Si tratta di sele- 
zionare le sequenze di caratteri che 
ricorrono più frequentemente in un 
file e di sostituirle con codici di ca- 
ratteri speciali. Per consentire la 
decodifica, si inserisce all’inizio di 
ogni file un elenco dei codici corri- 
spondenti alle stringhe di caratteri 
rimpiazzate. Questo metodo di 
compressione dei testi è molto vali- 
do, specialmente per i programmi 
o i linguaggi naturali, giacché le 
parole chiave, i nomi di variabile o 
altre parole (come the e and in in- 
glese) ricorrono molto spesso. 

Ma anche in questo caso sorgono 
alcuni problemi. Il più consistente 
è quello della scelta delle stringhe 
di caratteri da abbreviare. Nel caso 
di programmi scritti in un linguag- 
gio particolare, le parole chiave si 
ripetono più volte e quindi è chiaro 
che conviene sostituirle, ma quali 
sono le stringhe di caratteri che, in 
generale, è bene sostituire? Le 
possiamo individuare solo esami- 
nando il file, poiché non ci sono 
stringhe preferibili in generale. 

L’obiettivo, naturalmente, è 
quello di ottenere il massimo ri- 
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sparmio di spazio. In questo senso 
siamo limitati dal numero di codici 
disponibili per le sostituzioni. Se 
usiamo i codici inutilizzati, siamo, 
di solito, ristretti ad un numero che 
varia tra i 10 ed i 50 codici. Se 
estendiamo l’insieme di caratteri 
(per esempio usando i codici a 8 bit 
con l’ASCII a 7 bit) allora possia- 
mo disporre di almeno 128 codici. 
L’uso di una sequenza escape può 
fornirne fino a 256, ma al prezzo di 
almeno 2 caratteri per abbreviazio- 
ne. In tutti i casi, il numero di co- 
dici disponibili sarà sempre limita- 
to, diciamo ad m. Così dobbiamo 
scegliere per l’abbreviazione le m 
stringhe che consentono il maggior 
risparmio di spazio. 

Non è detto che si scelgano sem- 
pre le m stringhe che compaiono 
più frequentemente. Consideriamo 
le due stringhe per e compressione 
dei testi. Se per compare 100 volte 
e compressione dei testi solo 15 vol- 
te, quale dobbiamo sostituire? So- 
stituendo per, sequenza di 3 carat- 
teri, con un singolo codice d’abbre- 
viazione, risparmiamo 2 caratteri 
(supponendo il codice di abbrevia- 
zione di 1 byte) per ogni volta che 
la stringa compare nel testo, cioè 
in totale 200 caratteri. Sostituendo 
compressione dei testi, sequenza di 
22 caratteri, si risparmiano 21 ca- 
ratteri alla volta, cioè 315 caratteri. 
Dunque, in generale, dobbiamo 
rimpiazzare la sequenza di caratteri 
che ha massimo prodotto tra lun- 
ghezza e frequenza. Un esempio di 
sostituzione di sottostringhe è illu- 
strato dalla figura 5. 

Il problema della codifica diven- 
ta quello di trovare le m sequenze 
con massimo prodotto lunghezza- 
frequenza, per rimpiazzarle tutte 
con gli m codici di abbreviazione, 
dopo aver premesso l’elenco delle 
abbreviazioni all’inizio del file 
compresso. In fase di decodifica in- 
vece il problema si riduce sempli- 
cemente a leggere il dizionario ed a 
sostituire tutti i codici con le corri- 
spondenti stringhe di caratteri. 


Il codice di Huffman 


Tutti i metodi di compressione 
dei testi discussi finora sono simili, 
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Fig. 5. La compressione dei testi 
per sostituzione di sottostringhe. 
Queste vengono rimpiazzate da co- 
dici d’abbreviazione (qui abbiamo 
usato sequenze escape). All’inizio 
del file si inserisce un dizionario dei 
significati delle abbreviazioni. 


nel senso che si riducono a lavora- 
re con un dato codice di caratteri 
ed una data struttura di byte. Un 
ulteriore risparmio si può ottenere 
ricodificando la rappresentazione 
stessa dei codici carattere. Quasi 
tutte le rappresentazioni dei codici 
carattere utilizzano una dimensio- 
ne fissa: 4 bit per un decimale codi- 
ficato in binario (BCD), 7 bit in 
ASCII e 8 bit in EBCDIC. In que- 
sto modo si spreca molto spazio. 

Consideriamo il semplice proble- 
ma di codificare i 4 caratteri A, B, 
C e D. Se usiamo una dimensione 
fissa per codice, allora abbiamo bi- 
sogno di 2 bit per ogni carattere, 
così: 


A 00 
B 01 
C 10 
D 11 


Ma supponete che la lettera A ri- 
corra nel testo al 50%, B al 25% e 
C e D si dividano equamente il ri- 
manente 25%. Allora il seguente 
codice carattere a lunghezza varia- 
bile produrrà un testo di lunghezza 
media minore. 


A 0 

B 10 
c 110 
D 111 


Per calcolare la lunghezza media 
del testo, si consideri che, su n ca- 
ratteri, n/2 saranno A e richiede- 
ranno 1 bit ciascuno, n/4 saranno B 
e vorranno 2 bit ciascuno ed i rima- 
nenti n/4 saranno C o D a 3 bit cia- 
scuno. Così il numero totale di bit 
per rappresentare n caratteri è: 


1 (n/2) + 2 (n/4) +3 (n/4) = 1.75 n 


Confrontando questo risultato 
con i 2r bit richiesti dal codice a 
lunghezza fissa, vediamo che ab- 
biamo risparmiato il 12.5% della 
dimensione totale del file. 


Dizionario: 

$A “per” 

$B “compressione dei testi” 
$C. “computer” 


Testo: 

Questo articolo ha $A argomento 
la $B nel $C, $A consentire una 
maggior disponibilità di memoria 
nel $C stesso. ... 


Codificare e decodificare con 
lunghezze variabili è un po’ più dif- 
ficile che non con lunghezze fisse, 
ma non eccessivamente. Bisogna 
solo lavorare molto di più sui bit. 
Per codificare una stringa come 
ABAABCDAB, concateniamo 
semplicemente le rappresentazioni 
a bit di ogni carattere, superando, 
se necessario, i limiti dei byte. 


A B AAB C D AB 
0 10 0 010 110 111 010 


Per la decodifica, dobbiamo leg- 
gere da sinistra a destra, esaminan- 
do ogni bit. Per la stringa 
01001100, notiamo che il primo bit 
è uno 0. Poiché solo A comincia 
con 0, il primo carattere è A. Il se- 
condo bit è un 1, ma guardando al 
bit seguente notiamo che il caratte- 
re corrispondente deve essere B. 
Spostiamo i due bit di B, e conti- 
nuiamo. Il bit seguente è 0, quindi 
il carattere è A. Poi c’è un 1, e 
dunque si ha B, C o D. Poi ancora 
un 1, quindi B è escluso. Il bit che 
segue indica finalmente C. L’ulti- 
mo carattere è poi A. Così il testo 
decodificato risulta ABACA. 

I file di testi memorizzati nel 
computer possono avvalersi profi- 
cuamente del codice di Huffman. 
Lo si può usare ogniqualvolta le 
probabilità dei codici carattere non 
sono uguali. In effetti, più le pro- 
babilità sono diverse, migliori sono 
i risultati della compressione con il 
codice di Huffman. Guardando 
una tabella delle frequenze relative 
alle lettere nella lingua italiana, 
notiamo che hanno valori molto di- 
versi, e quindi si prestano bene ad 


essere compresse con il codice di 
Huffman. 

Per costruire un codice di Huff- 
man, si usa un algoritmo molto 
semplice (ci riferiamo alla figura 
6). Per prima cosa è necessario cal- 
colare le probabilità relative ai ca- 
ratteri da codificare. Per questo bi- 
sogna effettuare un passaggio at- 
traverso un testo campione, un 
pezzo di file, l’unione di parecchi 
file, a scelta, contando la frequen- 
za dei diversi caratteri. Poi bisogna 
ordinare i caratteri secondo la loro 
frequenza. Prendiamo i due carat- 
teri meno frequenti, e li combinia- 
mo in un supercarattere, la cui fre- 
quenza è la somma di quelle dei 
due caratteri. Il codice relativo ai 
due caratteri sarà il codice del su- 
percarattere seguito da 0 per un ca- 
rattere e da 1 per l’altro. Ora eli- 
miniamo dalla lista i due caratteri 
usati meno frequentemente ed in- 
seriamo in essa il nuovo supercarat- 
tere nel posto corrispondente alla 
sua frequenza. Il processo continua 
finché tutti i caratteri ed il superca- 
rattere sono ridotti da un solo su- 
percarattere. Quel che si ottiene è 
un codice di Huffman di lunghezza 
media di codice minima. Il codice 
di Huffman può essere rappresen- 
tato meglio tramite un albero bina- 
rio con i nodi terminali (le foglie) 
corrispondenti ai caratteri codifica- 
ti. : 

Il codice di Huffman può dare 
buoni risultati nella compressione 
dei testi, in certi casi riducendo la 
dimensione di un file di più della 
metà. La tecnica di base può essere 
migliorata con alcuni accorgimenti. 
Ad esempio, si possono usare cop- 
pie di caratteri, invece di caratteri 
singoli, come base di codifica. Ciò 
richiede una tabella di frequenze 
più grande, perché ora dobbiamo 
calcolare le frequenze delle coppie, 
ed anche una tabella più estesa di 
associazioni tra coppie di caratteri 
e codici di Huffman, ma consente 
di ottenere un risparmio notevole. 


Un'altra possibilità consiste nel- 
l’uso del codice di Huffman condi- 
zionale. L’idea è quella di utilizza- 
re il fatto che la probabilità (la fre- 
quenza) di un carattere varia a se- 
conda di quale è il carattere che lo 
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Fig. 6. Il codice di Huffman per le 
lettere dell'alfabeto inglese, basato 
sulle loro probabilità (frequenze). 
La lunghezza dei codici è inversa- 
mente proporzionale alla frequenza 
con cui le relative lettere compaiono 
nella lingua inglese (più o meno co- 


precede. Per esempio, la probabili- 
tà di trovare una Q seguita da una 
U è vicina a 1, mentre quella di 
avere U seguita da U è pratica- 
mente nulla. Perciò una codifica 
ottimale dovrebbe assegnare ad 
una U che segue Q un codice mol- 
to breve ed ad una U che segue 
un’altra U un codice molto lungo. 
L’algoritmo di codifica comprende 
il calcolo della frequenza con cui 
ogni carattere segue tutti gli altri. 


me nel codice Morse). Le lunghez- 
ze dei codici variano da 9 bit (per la 
zelaj)a3bit (perlaeelat). La 
lunghezza media è di 4.1885 bit per 
lettera. Con un codice a lunghezza 
fissa ne sarebbero necessari 5, ed il 
risparmio è del 16%. 


Si deve quindi calcolare un codice 
di Huffman separato per i caratteri 
successivi ad ogni carattere. Il pia- 
no di codifica tiene conto dell’ulti- 
mo carattere codificato e se ne ser- 
ve per scegliere il codice da asse- 
gnare al carattere seguente. Anche 
l’algoritmo di decodifica deve me- 
morizzare l’ultimo carattere deco- 
dificato per essere in grado di sce- 
gliere il giusto metodo di decodifi- 
ca. I codici di Huffman sono vera- 
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mente molto semplici, ma possono 
essere resi più complessi se si vuol 
ottenere una compressione miglio- 
re. Tuttavia, anche usando codici 
di Huffman semplici, possono sor- 
gere dei problemi. Intanto si noti 
che la codifica e la decodifica di 
Huffman comportano comunque 
un grosso lavoro sui bit, che può 
dar luogo a programmi molto lenti. 
Poi, la compressione migliore si ot- 
tiene con il codice di Huffman se le 
frequenze dei caratteri di un file 
sono molto diverse tra loro, e que- 
sta caratteristica varia da un file al- 
l’altro. Perciò è meglio effettuare 
codifiche diverse per ogni file. Ciò 
si può fare premettendo ad ogni fi- 
le il relativo codice (come si fa con 
i dizionari delle abbreviazioni), an- 
che se così si aumenta la dimensio- 
ne del file (in misura considerevole 
per i file piccoli). 

Inoltre, la caratteristica della 
lunghezza variabile dei codici di 
Huffman li rende estremamente 
soggetti ad errori di trasmissione e 
memorizzazione. In un codice a 
lunghezza fissa, modificando un 
bit, si varia solo il carattere corri- 


Usare il sistema operativo CP/ IM 


IL LIBRO 


Il sistema operativo CP/M è stato progettato per rendere 
semplice l’uso di un microcomputer. Questo libro vi 
renderà semplice l'uso del CP/M. (Le v 


del CP/M sono 


spondente, mentre col codice di 
Huffman, a causa di un errore sulla 
lunghezza ipotetica del carattere 
sbagliato, possono venire decodifi- 
cati in modo scorretto sia quel ca- 
rattere che tutti i successivi. (Un 
problema simile si avrebbe in un 
codice a lunghezza fissa se si ag- 
giungesse o togliesse un bit.) Così, 
per sicurezza, è meglio inserire nel 
file controlli d’errore in abbondan- 
za, anche a costo di aumentarne la 
dimensione. 

In alcuni settori i codici di Huff- 
man si rivelano di grande utilità. 
Pensate ad un sistema word proces- 
sing che memorizza file su una pe- 
riferica seriale a bassa velocità, per 
esempio su cassette. Poiché il siste- 
ma ha uno scopo particolare, si 
possono calcolare le frequenze at- 
tese per tutti i caratteri della lingua 
italiana, con un unico codice di 
Huffman per tutti i file. La codifica 
e la decodifica possono essere ef- 
fettuate automaticamente dalle 
routine di controllo del nastro. Op- 
pure entrambe potrebbero essere 
inglobate nell’hardware stesso del- 
la periferica come una logica spe- 


ioni esaminate fino 


il CP/M 1.4-il CP/M 2.2. e‘il nuovo 


sistema operativo multiutente MP/M) La maggior parte di 
utenti di microcomputer dovrà, infatti, un giorno o l’altro, 
fare ricorso al CP/M, disponibile su quasi tutti i computer 


bas: 


Per ordinare 

i volumi utilizzate 
l'apposito tagliando, 
inserito in fondo 
‘alla rivista. 


descrizione, pas: 


esecuzione delle 


del sistema: accei 


i sui microprocessori 8080 e Z80, come pure su certi 
sistemi utilizzanti il 6502. Il libro, senza presupporre 
alcuna conoscenza di un calcolatore, inizia con la 


o-passo delle procedure di inizializzazione 
one, inserimento dei dischetti, 


più comuni operazioni su file, compresa la 


duplicazione dei dischetti. Prosegue con il PIP (programma 


di trasferimento 


dei file), il DDT (programma di messa a 


punto) e ED (programma editor). Per entrare sempre più, 
fornendo numerosi consigli pratici, all'interno del CP/M e 
delle sue operazioni, al fine di comprenderne appieno le 
risorse ed eventualmente dare gli strumenti per successive 


modifiche. 
SOMMARIO 
Introduzione al 


CP/M e all'MP/M-Le caratteristiche del 


CP/M e dell’MP/M-Gestione dei file con PIP-L'uso 
dell’editor-Dentro al CP/M e all’MP/M-Guida di 


errore-tabella di 
PIP-ria: 
di PIP- 
di estensione-! 
del calcolatori 
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per la localizzazione dei guasti. 


riferimento ai comandi e ai programmi del CP/M e 
dell’MP/M-Consigli pratici-Il futuro-messaggi comuni di 


controllo di ED-nomi dei dispositivi di 


unti dei comandi-parole chiave di PIP-parametri 
sti di controllo per la digitazione dei comandi-tipi 


dei materiali-organizzazione della stanza ia 
erifiche in caso di errore-regole di base n 
n 


al 


ciale o un piccolo processore con 
una tavola di codifica/decodifica su 
ROM. Questo metodo di codifica/ 
decodifica risulterebbe totalmente 
trasparente all’utente. L’unico ef- 
fetto prodotto sarebbe la capacità 
di memorizzare un numero grande 
ma variabile di “caratteri” su di 
una quantità fissa di nastro. 


Conclusioni 


La quantità di spazio disponibile 
per memorizzare informazioni può 
essere ridotta sensibilmente con 
semplici tecniche di compressione 
dei testi, come quelle che abbiamo 
introdotto in questo articolo. 
Ognuna di esse offre un risparmio 
di spazio nella memorizzazione di 
molti file. E molte tecniche posso- 
no essere usate una dopo l’altra 
per ottenere una compressione a 
più stadi. La compressione dei testi 
può essere un metodo semplice ed 
efficace per aumentare la quantità 
di memoria disponibile al prezzo di 
pochi cicli d’elaborazione. 


Pagg. 320 
Cod. 510P 


L. 22.000 


SCONTO 20% 
ag chbonati 


COLOR COMPUTER TRS 80/16 K ‘ 
L. 750.000 . a 


Il grande personal computer capace di 
essere tutto: un vero e proprio gestionale, 
un video-gioco intelligente con le cartucce più 
sofisticate, un potente elaboratore di dati 
programmabile ed espandibile, un avanzato 
sistema computer-grafico a colori. 


Soprattutto un amico. 


REBIT 
COMPUTER 


A DIVISION OF G.B.C 


festa grande in edicola | 


_"e—_ = 


La guida 
più completa 
a tutte 

le meraviglie * 
dell'elettronica: 
computer, componenti, TV 
videogiochi, hi-fi, stereofonia. 


Il\ catalogo più atteso. 
©ltre 500 pagine. Migliaia di articoli. 
Offerte interessanti. 


RIVISTE JACKSON. 
VOCE 


, LA 
PIU AUTOREVOLE 
NELCAMPO 
DELL'ELETTRONICA 
E DELL'INFORMATICA. 


INFORMATICA OGGI 


COMPUTERWORLD, ITALIA 


BIT 


Hardware 


Apparecchiature per trasmissione 


Unità centrali dati: 

Super computer Accoppiatori acustici ° 
Main frame Modem CL) 
Supermini a 32 bit Modem eliminator ° 
Minicomputer a 16 bit Multiplexer ° 
Microprocessori a 16/32 bit Concentratori () 
Microprocessori a 8 bit Controllori di linea ° 
Microcomputer single-chip Communication Processor e 
Micro bit-slice Sottosistemi X.25 o 
Memorie centrali Sottosistemi SNA DI 
Memorie cache bipolari Reti locali 

RAM statiche Broadband CI 
RAM dinamiche Baseband ° 
ROM Schemi a polling LC) 
EPROM Schemi CSMA/CM () 
Memorie di massa Schemi token passing ° 
Unità a dischi rimovibili Cavi coassiali Cc) 
Unità a dischi Winchester da 14 inches Fibre ottiche ° 


Unità a dischi Winchester da 8 inches 


LL 


Unità a dischi Winchester da 5, 25 
inches 


Computer graphics 


Sistemi integrati 


Unità a floppy 


Terminali grafici intelligenti 


Unità a minifloppy 


Plotter a penna 


Unità a microfloppy 


Plotter elettrostatici 


Unità a nastro da 1/2 inches 


Digitalizzatori 


Unità a nastro da 1/4 inches 


Joystick 


Unità video tape di backup 


Mouse 


Mass Storage Systems 


Sistemi industriali 


Dischi ottici 


Controllori programmabili 


Dischi a stato solido 


Unità CAD/CAM 


Memorie a bolle 


Sensori controllori di processi 


Memorie EEPROM 


Terminali 


Unità CRT alfanumeriche 


Unità grafiche storage 


Unità grafiche refresh 


Unità grafiche raster-scan 


Unità a colori 


Unità a plasma 


Display video a LED 


Display video a cristalli liquidi 


Stampanti 


Unità seriali ad aghi ad impatto 


Unità seriali a margherita 


Unità parallele 


Unità elettrostatiche 


Unità termografiche 


Unità a Laser 
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Software tool 


Robot ° Screen Editor o [le 
Software Form editor = © la 
Sistemi operativi SIN simbolici o [è 
Single user o uery : © [lè 
Real-time o [a Report writer © | 
Multi-tasking © [lè Application generator e le 
Multi-processor © [è Protocolli di comunicazione mu 
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Linguaggi procedurali 


Bus contention 


Linguaggi strutturati 


Srumenti applicativi 


Linguaggi di Query 


Linguaggi non procedurali 


Word Processing 


Posta elettronica 


Linguaggi “naturali" 


Simulatori finanziari 


File management e data base 


Indexing 


Gestori di agenda 


Package grafici 


Ashing 


Package scientifici 


Data Base gerarchici 


Package amministrativi 


Data Base reticolari 


Package industriali 


Data Base relazionali 


Dal 1983 anche Elektor, il più prestigioso 


mensile europeo di elettronica perappas- 
sionati, tecnici e hobbisti, è pubblicato in 
Italia dal Gruppo Editoriale Jackson. 

Pubblicato in quasi tutte le principali lin- 
gue europee (inglese, francese, olandese, 


tedesco, spagnolo, greco e italiano), 
Elektor ha acquisito un successo che si 
può ragionevolmente basare su quasi 
500.000 copie in tutta Europa. 


La rivista di elettronica, scienza, La prima edizione, uscita nei Paesi Bassi, 


tecnica e diletto. 


nacque 23 anni fa: un successo che non 
ha precedenti in Europa, in questa fascia 
di lettori. 

Ciò che contraddistingue Elektor è l'ap- 
proccio alla materia: semplice, ma non 
per questo meno approfondito; di estre- 
mo interesse sia per lo sperimentatore sia 
per il professionista di elettronica. 
Proponendo realizzazioni e sperimenta- 
zioni pratiche, tutte originali, con l'impie- 
go dei più moderni componenti discreti e 
integrati, Elektor stimola i propri lettori a 
seguire da vicino ogni progresso in elet- 
tronica, con tutte le migliori indicazioni 
tecniche e divulgative di supporto. 


Gli speciali dell’anno 


Elektor non è solo una rivista: è tutta una. 
serie di pubblicazioni al contorno, che ri- 
assumono le migliori applicazioni euro- 
pee di elettronica, con tutta una serie di 
progetti collaudati da una redazione in- 
ternazionale. 
Un numero speciale, edito annualmente, 
presenta i 100 progetti migliori: tutti ga- 
rantiti e testati. 

Dal 1983 Elektor è Jackson: un'ulteriore 
garanzia di professionalità. 
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INFORMATICA 
I 


Rivista di elaborazione dati 
e telematica. 


In soli due anni, Informatica Oggi è dive- 
nuta il punto di riferimento obbligato per 
chiunque, in Italia, desideri un mensile 
approfondito e aggiornato di informatica 
professionale. 

Informatica ‘Oggi è la rivista dei sistemi, 
dai microcomputer della fascia alta ai mi- 
ni, ai supermini, ai mainframe. 
Terminali, periferiche, sistemi di trasmis- 
sione dati e telematica costituiscono il 
fondamentale complemento di informa- 
zione tecnica che la rivista fornisce. 
Strutturatasi di recente con una redazio- 
ne fissa nella Silicon Valley, in California, 
oltre alla redazione di Milano, Informatica 
Oggi è riconosciuta come la rivista di in- 
formatica professionale più seria e com- 
pleta non solo in Italia, ma certamente 
anche in Europa. Da gennaio 1982 è pub- 
blicata anche in edizione spagnola. 
Informatica Oggi: il meglio del mercato 
editoriale informatico in Italia, con il ne- 
cessario corredo di informazioni econo- 
miche, su nuovi prodotti, di interviste, no- 
tizie flash, rapporti sulle più importanti 
manifestazioni fieristiche e congressuali, 
in Italia e nel mondo. 


Gli speciali dell’anno 


Gli “speciali” sono l'elemento portante, in 
Informatica Oggi, più che in qualsiasi al- 
tra rivista Jackson. 

Redatti negli Stati Uniti, su misura per il 
lettore italiano. Una garanzia di serietà e 
professionalità. 

Argomenti dei servizi speciali pubblicati 
su Informatica Oggi nel 1982: Modem e 
Multiplexer - Software Tool - Ethernet, 
una realtà di mercato? - PBX e Reti Locali: 
la lotta per l'ufficio integrato - Mini & Offi- 
ce Automation - NCC: dai dinosauri alle 
formiche - Mainframe IBM e compatibili - 
Data Base Machine - Il boom dei sistemi 
fault-tolerant - Small Talk e Interlisp: una 
nuova interfaccia uomo-macchina. 


sonal, home e business computer. 

Una pubblicazione stimolante per chi 
vuol vivere l'affascinante avventura tecni- 
ca offerta dal mondo dei piccoli sistemi. 
In un mercato in crescente espansione, 
BIt è divenuta ormai il leader incontrasta- 


Anche con Bit, il Gruppo Editoriale Jack- 

son è stato lungimirante. 

È curioso (e ci rende orgogliosi) il fatto 
RE che Bit sia la prima rivista europea di per- 
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mese, per il ruolo formativo che la rivista 
ha assunto fin dall'inizio, accompagnan- 
do nella crescita culturale e tecnica l'hob- 
bista, il tecnico, l'appassionato di perso- 
nal computer. 

È la più letta tra le riviste Jackson. 

Una miniera di idee e soluzioni pratiche 
per “giocare” con il computer, imparare a 
programmare, disporre di un’informazio- 
ne approfondita, su tutte le ultime novità 
del mercato. 


Gli speciali dell’anno 


Gli speciali di Bit sono i Test sulle ultime 
novità nei personal, o meglio i BITEST, 
divenuti ormai un classico, per il Metodo 
di analisi, sia hardware sia software, le 
fotografie, il contenuto tecnico e profes- 
sionale dell’informazione, i raffronti. 

In più, quattro volte all'anno, un numero 
di Bit è monografico. Questi i temi dell'ul- 
timo anno: Computergrafica - Word Pro- 
cessing - Pocket Computer - Bit Didattica, 
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La prima rivista europea di software 
per personal computer. 


accolta 
i routine pasic 


‘Nella riga 1199 


Personal Software apre un capitolo nuovo 
nell'editoria legata ai personal compu- 
ting: è una rivista di software, dedicata a 
due tipi di lettori: coloro che già posseg- 
gono un personal (0 intendono acquistar- 
lo entro breve) e coloro che, pur non pos- 
sedendo un personal, si interessano di 
software in BASIC, di programmi e siste- 
mi operativi per personal. 

Di personal, in Italia, ne esistono circa 
30000: un'ottima base di lettori da cui, fin 
dal primo numero, uscito nel giugno '82, 
sono provenuti una miriade di suggeri- 
menti e consigli. 

Personal Software è una rivista attualissi- 
ma, interattiva con il lettore, realizzata 
con una formula del tutto nuova. 

Una prima sezione è dedicata ad articoli 
generali, di approfondimento teorico di 
certi aspetti e problemi di software. La 
seconda sezione è fatta di programmi, già 
predisposti, testati e pubblicati insieme ai 
relativi listati, dedicati ai personal più dif- 
fusi sul mercato. 

Quando è tecnicamente possibile, lo stes- 
so programma è pubblicato nelle varie 
versioni, relative alle macchine su cui può 
operare. 

Personal Software è la rivista per i veri 
“amatori” dei personal, per un pubblico 
giovane, intelligente, dinamico come il 
mezzo stesso a cui si rivolge. 


Gli speciali dell’anno 


Personal Software è appena nata: non si 
può quindi pubblicare un elenco di spe- 
ciali. Ricordiamo, tuttavia, alcune iniziati 
ve che già hanno riscosso notevole suc- 
cesso: la pubblicazione, in omaggio, della 
GUIDA AL SOFTWARE pubblicato sulle 
riviste italiane; una testimonianza del ser- 
vizio informativo completo che il Gruppo 
Editoriale Jackson intende proporre, con 
questa nuova iniziativa. 
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L44000 _—L-48:500° - 
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SERVIZIO ABBONAMENTI 


\'ELETTRONICA 
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EO+ lE 
EO+ AO 

. EO+ IO 
SERIO BT 
IO + VE 
CW+ IO 
BT + PS 
CW+ l’E 
EO+ VE + EK 
EO+ lE + IO 
EO+ l’E + BT 
IO + BT + PS 


76.500 
BT-+ IO + VE 83.500 [IM RN IN 
EO+ VE + 


EK + AO L10250 NN 
tutte le riviste .. L24900 MASON EO 


LEGENDA MVE—= ELETTRONICA HI EO — ELETTRONICA OGGI 
HI AO — AUTOMAZIONE OGGI BD EK = ELEKTOR 

HI 10 — INFORMATICA OGGI II CW — COMPUTERWORLD 

DBT-= BIT BD] PS — PERSONAL SOFTWARE 

BI SM — STRUMENTI MUSICALI 


PPRrerrcreredri sasa 


11 numeri, 
L. 26.500 
anzichè 

L-83:0007 . 
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NR | 


È ‘38 numeri 11 numeri 10 numeri 10 numeri 
L. 60.000 L. 26.000 L. 28.000 L. 24.000 
anzichè anzichè anzichè anzichè 


N.B. 


COMPUTERWORLD 


Li 


ABBONAMENTO CUMULATIVO A DUE 
O PIU’ RIVISTE CON SCONTO PARTICOLARE 


Tutti coloro che sottoscrivono abbonamenti a due 

o più riviste godono di un prezzo ulteriormente 
agevolato, come appare nella seguente tabellina. 
Abbonamento a due riviste somma dei prezzi scontati 
delle due riviste - L. 2.000. 

Abbonamento a tre riviste somma dei prezzi scontati 
delle tre riviste - L. 4.000. 

Abbonamento a quattro riviste somma dei prezzi i 
scontati delle quattro riviste - L. 7.000. y 
Abbonamento a cinque riviste somma dei prezzi 

scontati delle cinque riviste - L. 10.000. pu 
Abbonamento a sei riviste somma dei prezzi scontati Î 
delle sei riviste - L. 13.000. ] 
Abbonamento a sette riviste somma dei prezzi ( 
scontati delle sette riviste - L. 16.000. 

Abbonamento a otto riviste somma dei prezzi scontati | 
delle otto riviste - L. 20.000. 9 
Abbonamento a nove riviste somma dei prezzi Î 
scontati delle nove riviste - L. 25.000. 


- Per sottoscrivere abbonamenti utilizzate il modulo di c.c.p. 
inserito in questo fascicolo oppure inviate un assegno o _ 
un vaglia postale al nostro ufficio abbonamenti. sf" 
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A sud di questa baia c'è la favolosa 
Silicon Valley: il paradiso della mi- 
croelettronica e dell'informatica. 
Quasi tutte le industrie “che conta- 
no" cisono: anche il Gruppo Edito- 
riale Jackson, con la propria sede 
di Sunnyvale. Tra tutti gli abbonati 
sarà sorteggiato un viaggio sog- 
giorno della durata di una settima- 


na. 


Sarete ospiti della GEJ Publiching 
Group, visiterete la splendida e so- 


leggiata California. 


REGOLAMENTO DEL CONCORSO 


1 


2) 


3) 


Il Gruppo Editoriale Jackson srl 
promuove un concorso a premi 
in occasione della campagna 
abbonamenti 1983. 

Per partecipare al concorso è 
sufficiente sottoscrivere un ab- 
bonamento 1983 ad almeno una 
delle nove riviste Jackson entro 
il 28.2.1983 

È previsto un premio (viaggio 
soggiorno) da sorteggiare fra 
tutti gli abbonati a nove premi, 
uno per ciascuna rivista, da sor- 
teggiare fra gli abbonati alle 


4) 


5) 


6) 


con Valley 


IL SUPERPREMIO PER TUTTI ... 


singole riviste. 

Gli abbonati a più di una rivista 
Jackson avranno diritto all'in- 
serimento del proprio nominati- 
vo per l'estrazione relativa al 
viaggio soggiorno tante volte 
quante sono le riviste cui sono 
abbonati 

L'estrazione dei premi indicati 
in questo annuncio avverrà 
presso la sede Jackson entro il 
30.6.1983. 

L'elenco dei vincitori e dei pre- 
mi sarà pubblicato su almeno 


7) 


8) 


sei delle riviste Jackson subito 


dopo l'estrazione. Il Gruppo 
Editoriale Jackson inoltre, ne 
darà comunicazione scritta ai 
singoli vincitori 

| premi verranno messi a dis» 0- 
sizione degli aventi diritto entro 
60 giorni dalla data di estrazio- 
ne. 

| dipendenti, i familiari, i colla- 
boratori del Gruppo Editoriale 
Jackson sono esclusi dal con- 
corso 


L'ELETTRONICA 

Apple Il - Uno dei più diffusi e presti- 
giosi personal computer. Infinite pos- 
sibilità di utilizzo. 48 Kbyte RAM. 


ELETTRONICA OGGI 

TEK 2213-L'oscilloscopio Tektronix a 
2 canali DC 60 MHz - 20 mV/div. 50 
MHz 2 mV/div. Il sogno di ogni tecnico 
e laboratorio elettronico. 


... E PER OGNI RIVISTA 


See S 
SES 


AUTOMAZIONE OGGI 

Mini Robot - Il Robot in kit della Soft- 
Power. Una periferica per personal 
computer dalle infinite applicazioni 
per esplorare il nuovo mondo della ro- 
botica. A portata di “Basic”. 


ELEKTOR 

Junior Computer - Il computer didatti- 
co in kit che ha entusiasmato gli hob- 
bisti di tutti i paesi europei 


GRUPPO EDITORIALE JACKSON 
SERVIZIO ABBONAMENTI 


HEGH5MUREEGEES 
HENRSEBnGEEZO 
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BIT 

Spectrum - ll nuovo entusiasmante 
personal Sinclair. Incredibili capacità 
grafiche a colori. Un gioiello di tecno- 
logia e miniaturizzazione. 


PERSONAL SOFTWARE 

VIC 20 - Un best-seller nei personal. Il 
sistema ideale per divertirsi in modo 
intelligente con il computer. 


COMPUTER WORLD 

Rainbow 100 - Il superbo computer 
Digital Equipment al vertice della 
gamma personal. Doppio processore, 
da 64 a 256 Kbyte RAM, 2 floppy disk 
da 600 Kbyte. 


STRUMENTI MUSICALI 

Roland HP 70 - Il pianoforte elettroni- 
co portatile con prestazioni professio- 
nali. 75 tasti, effetto chorus, touch- 
control per la dinamica su ogni tasto. 


RISERVATO 
A CHI 

SI ABBONA 
ENTRO 


INFORMATICA OGGI IL 28-2-83 


Epson MX100 - La stampante a impat- 
to famosa in tutto il mondo. Massima 
affidabilità e ottime prestazioni. Una 
periferica d'eccezione. AUT. MIN. N° D.M. 4/236724 del 27/10/82 


ENCICLOPEDIA DI El 


, aggiornata, ma fi 


igorosa 


ri 


, Completa, 


opera unica 


un 


fascicolo. 


Ogni fascicolo è costituito da: 


@ 12 pagine di Elettronica Digitale - Microprocessori; 
allo stato solido - 


Informatica e Società; 
®1 scheda di Elettrotecnica. 


| fascicoli saranno raccolti in 7 volumi di 200 pagine l'uno 
risguardi e indici L. 5.000. 


Raccoglitore per le 50 schede L. 5.000. 


‘1500 pagine, 700 foto a colori, 2200 illustrazioni a colori 


@ 16 pagine di Elettronica 
Telecomunicazioni oppure 16 pagine di Informatica - 
più 1 raccoglitore per le 50 schede di Elettrotecnica. 


partire da gennaio 1983 in tutte le edicole a L. 2.500 al 


50 fascicoli pubblicati settimanalmente, sarà disponibile a 
Copertine con sovracoperte, 


L'Enciclopedia di Elettronica e Informatica, composta da 


e l’informatica 
sono una 
cosa seria 


Un’opera seria 
perché l'Elettronica 


ue 


i 


t/ 


il 
Îh 


/ 


{i 


.i 


/ 
il 
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GRUPPO EDITORIALE JACKSON 


DIVISIONE GRANDI OPERE 


ETTRONICA E INFORMATICA 


ELETTROTECNICA 

e Costituzione della materia e Conduzione, 
resistività, ecc. e Corrente-Tensione- 
Resistenza e Circuito elettrico e Kirchhoff 
ed altri metodi risolutivi (Thevenin, Norton, 
Sovrapposizione) e Lavoro, Potenza, Ren- 
dimento e Campo magnetico e Campo elet- 
trico e Circuito Magnetico e Induzione e 
Autoinduzione e Bobina e Condensatore e 
Corrente Trifase e Potenza Trifase e Ampe- 
rometri, Voltmetri, altri strumenti di misura 
e Funzionamento del trasformatore e Gene- 
ratore, motore e Motore a c.c. 


ELETTRONICA ALLO STATO SOLIDO 

® Principi fisici dei tubi e Triodo e Diodo a 
semiconduttori e Curve caratteristiche dio- 
do e impieghi e Transistori e SSI, LSI, VLSI, 
Gate Array e Tecnologie elettroniche (Bipo- 
lari, Mos, Cmos) e FET, MOSFET e SCR, 
DIAC, TRIAC » Optoelettronica (LED, LCD, 
CCD, Plasmadisplay,...) e Relais e Protezio- 
ni e Fotocellule, Fotodiodi, Termistori, Pan- 
nelli solari è Touchcontrol 


icile e scorrevole. che tutti possono capire 


ELETTRONICA DIGITALE Vol. 1 

e AND or NOT » Sistemi di numerazione e 
Codici e Algebra di Boole e Karnaugh e Co- 
dificatori e Decodificatori e Matrici e Selet- 
tori e Multiplexer e Comparatori e Addizio- 
natori e Sottrattori e RTL, DTL, TTL, FST, 
TTL SeNMOS, PMOS, VMOS, CMOS, l° Le 
flip-flop, SR, JK, T, D e Multivibratori 
(Schmitt) e Registri e Dispositivi per sintesi 
vocale e per Speech Recognition 


ELETTRONICA DIGITALE VOL. 2 . 

e Shift register è Clock e Contatori Binari © 
Contatori Decimali e Tipi di memorie e 
ROM, RAM, EPROM e Organizzazione della 
memoria e Operazionali e Sample and hold 
e Convertitori A/D e D/A e Conversione V- 
f/f-V è Calcolo delle probabilità e Struttura 
del Bus e Bus standard e Trasmissione dati e 
Interfacce standard e Optocoupler © Fibre 
ottiche e Esempi (UART - USART UIA) 


Realizzata 
in collaborazione 


con il Learning Center 


Texas Instruments 


Se desiderate abbonarvi all’Enciclopedia di 
Elettronica e Informatica usufruendo di un 
prezzo speciale, ricevendo direttamente a 
casa vostra le copie, potete inviare un asse- 
gno, o un vaglia postale oppure versate l'im- 
porto di L. 130.000 (anziché 165.000) sul 
ccp n° 11666203 intestato a 

Gruppo Editoriale Jackson - Grandi Opere. 


Per evitare danni ai fascicoli e garantire il 
recapito, le spedizioni saranno effettuate 
mensilmente (raggruppando 40 5 fascicoli) 
in apposito imballo. 

rr ec e ee 


MICROPROCESSORI 

e I/O di un microprocessore e Struttura di 
un microprocessore e Interfacce specializ- 
zate e Mezzi di sviluppo per microprocesso- 
ri è Linguaggi e Indirizzamento e Program- 
mazione e Microcalcolatori e Micropro- 
grammazione e Sviluppi Futuri 


TELECOMUNICAZIONI 

e Onde elettromagnetiche e Filtri - antenne - 
radar e Trasmissione: modulazione, tra- 
sduttori cavi, acustica, ottica, trasmissione 
dati (cenni), comandi a distanza, controllo 
di parità e Ricezione: Radio, TV, Telefonia, 
CB e Trasmissione dati e Varie 


INFORMATICA DI BASE 

e Informatica: ieri, oggi edomani e Architet- 
tura del calcolatore elettronico digitale è 
Funzionamento del calcolatore e Le memo- 
rie e Tecniche e dispositivi di ingresso/usci- 
ta è Struttura dei dati e Gli archivi dei dati e 
Programmazione e Sistemi operativi e Lin- 
guaggi e traduttore e Assembler e Cobol è 
Basic e Fortran e Pascal e Simula e Lisp e 
PL1 e RPG © Altri linguaggi e | data base 


INFORMATICA E SOCIETA’ 

o Il computer e la scienza e Il computer e la 
tecnica e ll computer e la vita di tutti i giorni 
e ll computer e l'elettronica nell'abitazione è 
Il computer e l'ufficio e Il computer e l'elet- 
tronica nella produzione e Il computer e 
l'elaborazione nella musica e La computer- 
grafica e La progettazione e il controllo tra- 
mite il computer e | problemi di segretezza e 
di esclusività e Computer ed intelligenza 
artificiale e Computer e istruzione. 


LIBRI JACKS 
LA MIGLIORE FORMA? 
NELL'ELETTRONICA E NEL 


TELEMATICA 


Dal viewdata 
all'ffice automation 


VoLuME 0 
IL LIBRO 
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Ri 
VE 


Ù | ELEMENTI DI 
| TRASMISSIONE 
DATI 


VOLUME 1 


Hi tibro 


di Adam Osborne 


PROGRAMMARE INTRODUZIONE 

AL PERSONAL 

IN ASSEMBLER E BUSINESS 
COMPUTING 


i‘) 


II 
LL 
7a n 1000 ff 


ETE LORO APPLICAZIONI: [E] PRINCIPI 
-=°-| ETECNICHE 
_SC/ MP DI ELABORAZIONE 
DATI 


(© 
| 


è MST 
NR 


| prezzi blu sono riservati agli abbonati 


IONE TECNICA — == 
7 Per Do dh "gi 
L'IFORMATICA, — 3 


il 
MANOBOOKZ:80 microprocessori 


dai chips ai sistemi 


VOL 1- TECNICHE DI PROGRAUMAZIONE 


il 
NANOBOOK Z-80° 


VOLI-TECNICHE DI INTERFACCIAMENTO 


FE 


dal 
L bi s( 


L, 17,600 


IMPARIAMO A PROGRAMMARE 


«BASIC 


con n PET/CBM 


Un Editor-Assembler Residente 


Viecgonra 
Seo sie 8080 0005 
SRI Dei 


] 


Vogliamo 
\ Tecniche dose 
d'interfacciamento IMPARIAMO A 
dei in BASIE coni 
microprocessori vic/ieBm 


LIBRI JACKSON. 
LA MIGLIORE FORMAZIONE TECNICA 
NELL'ELETTRONICA E NELL'INFORMATICA. 


GLI AMPLIFICATORI 
PUNORTONIGUADRURLI DICTIONARY DF COMPUTER SCIENCE 


Guida ai 
ITIRISTORI CMÒS 
IO fondamenti, circuiti 
Progetti pratici ed esperimenti 


003À 
. 19.000 | 
L. 15.200 


GUIDA MONDIALE Esperimenti con 
DEI TRANSISTORI al 


LA PROGETTAZIONE 


DI 
ELETTRONICA 
FONDAMENTALE 


ON ESPERIMENTI 


LA PROGETTAZIONE Guida moridiale degli Liprasto 
Comprendere DEI FILTRI Mei tegrati Perazionai CIRCUITI Laici SPemovieoa 

l'Elettronica ” ATTIVI 0 EEE ene i E DI MEMORIA TTL e 8080A 
a Stato Solido CON ESPERIMENTI ; Vga o: parroci porn rice 


Cod. 
202A 
L. 14.000 
L 11.200 


Introduzione pratica all'impiego del ni IRE il 
CIRCUITI INTEGRATI PHASE LOCKED BUGBOOK Ila 
DIGITALI LOOP" (PLL), 
» CON ESPERIMENTI 


H 
g L 14.000 


È L. 11.200 


| prezzi blu sono riservati agli abbonati 


dA 


Il corso articolato in 40 volumi per complessive 2700 
pagine, permette in modo rapido e conciso 
l'apprendimento dei concetti fondamentali di elettrotecnica 
ed elettronica di base, dalla teoria atomica all'elaborazione 
dei segnali digitali. 

La grande originalità dell’opera non risiede solo nella 
semplicità con cui gli argomenti vengono trattati, anche i 
più difficili, non solo nella struttura delle oltre 1000 lezioni 
incentrate su continue domande e risposte, esercizi, test, 
al fine di permettere la costante valutazione del grado di 
apprendimento raggiunto, ma soprattutto nella possibilità 
di crearsi in modo organico un corso “ad personam” 
rispondente alle singole necessità ed obiettivi. 

Se non avete tempo o non volete dedicare 120 delle vostre 
ore, anche in modo frammentario, al completamento del 
corso, potete seguire un programma di minima, sempre 
con brillanti risultati, con obiettivi, anche parziali, 
modificabili dinamicamente nel corso delle letture 
successive. 

Ogni libro è una monografia esauriente singolarmente 
consultabile per l'approfondimento di un particolare 
argomento. 


osita cedola di commissione libraria. L'OFFERTA È 
onati avranno comunque diritto allo sconto del 10% 
jono essere ordinati anche dai non abbonati 
jo naturalmente non si avrà diritto a sconto 


* ATTENZIONE. Per ordinare questi libri utilizzare l'app. 
VALIDA SOLO FINO A 28/2/1983. Dopo tale data gli abbo 
su tutti i libri JACKSON, novità comprese. | libri elencati poss 
utilizzando la stessa cedola di commissione libraria. In questo casi 
alcuno. 


CEDOLA DI COMMISSIONE LIBRARIA 
Da inviare a Gruppo Editoriale Jackson - Via Rosellini, 12 - 20124 Milano 


Nome Cognome 


Indirizzo 
Cap. Città Provincia 
LU LIDO 


Codice Fiscale (Indispensabile per le aziende) 


inviatemi | seguenti Ilbrl: 


Quantità 


i Codice Codice Codice 
ce | quantità iibro | Quantità a Gueriità | bro | Quantità 


OO Pagherò al postino il prezzo indicato nella vostra offerta speciale + L 1.500 per contributo fisso spese di spedizione 


(D Allego assegno n° di L (in questo caso la spedizione è gratuita) 


© Non abbonato CI Abbonato sconto 20% 0] l'Elettronica O Elettronica Oggi O Automazione Oggi DD Elektor 
O informatica Oggi DI Computerworld D Bit D Personal Software O Strumenti Musicali 


Data Firma — oi 


PRESENTA 


@fappiemai 


Ì 
Finalmente risolto il problema ‘ 
delle circolari e delle lettere | 
personalizzate. 
Con il + -f 
Personal >, “| 
Data Base. > fel 
generare archivi > — -} 
o utilizzare quelli Si ‘j 
che già usi per altri scopi | 
Con Apple Writer puoi 97 
comporre il testo della 
circolare 
L'estrema semplicità di utilizzo Con estrema semplicità 
rendono questo package lo AppleMail consente 
strumento ideale per redigere di creare circolari 


circolari promozionali, lettere 
personalizzate, estratti conto 

periodici o qualunque altro 

documento contenente dati e 

indirizzi. 

Tutto ciò senza dover creare archivi 
complementari, ma sfruttando quelli ‘ 
già creati e utilizzati normalmente 

per altri servizi. Il programma, fornito 
completo di manuale d’uso, floppy 

disk ed elegante contenitore, può 

essere acquistato al prezzo di L. 150.000 
(IVA compresa) presso uno dei 

rivenditori Apple oppure presso 
TechnoClub inviando il coupon riprodotto 
In questa pagina 

In entrambi i casi diventerai 
automaticamente socio del TechnoClub con tutti 
i vantaggi illustrati nelle pagine precedenti 
Possiamo inoltre fornire i programmi 

Apple Writer a L_125.000 

Apple Personal Data Base a L. 69.000 


o lettere personalizzate 


îognome Li 
lome 
scegliendo la seguente 
ia N forma di pagamento: 
ittà CAP D Allego assegno N 
di L se *Apple è un marchio registrato 
F_(per le aziende) O Ho versato l'importo tramite della Apple Computer Ine 


vaglia postale di cui allego 


Cupertino - USA 
onfermo l'acquisto di 


ricevuta | 
© Hoversato l'importo sul CCP SÌ 
package AppleMail a L. 150.000 cad n. 19445204 intestato a 
package Apple Writer a L. 125.000 cad TechnoClub - Milano TechnoClub - Via Rosellini, 12 
6 d. ) 
package Personal Data Base a L. 69.000 ca ileaeaiAtO 20124 Milano - Tel. (02) 6888228 ì 
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Raccolta 
di routine Basic 


Sono giunte un gran numero di lettere relati- 
ve al primo numero di questa rubrica in cui si 
parlava della punteggiatura. Sono state propo- 
ste modifiche, miglioramenti, e sono state mes- 
se in rilievo le diversità di comportamento dei 
vari computer. 

Anzitutto, una precisazione di carattere ge- 
nerale: la routine di punteggiatura (come tutte 
quelle che seguiranno) è scritta in Microsoft 
Basic, di cui, come si sa, esistono diverse ver- 
sioni. Noi utilizziamo quella standard, descritta 
per esempio in Microsoft Basic (Franco Muzzio 
editore). Evitiamo inoltre di usare funzioni non 
disponibili sui personal più diffusi (come EL- 
SE). Ne segue che le routine che pubblichiamo 
sono abbastanza generali per poter essere ese- 
guite sulla maggior parte dei personal computer 
in commercio. Naturalmente, l’implementazio- 


i INPLIT N$,X 


SCOPO: 
METTE LA FUNTEGGIATURA 
INTERI CON FIU’ DI 
DESTRA IN LUNA F 


VARIABILI: 
N& 


N NUMERI: 


IRRREZZZZZI 


N=VAL(N$) 
"+N$ 


L=LEN(N#$)-? 
IF L># THEN 1250 


n STEP +3 
"+MID$S(N$,I}3)+X$ 


X$=", 
NEXT 
X$=LEFT$(N$,I+3)+X$ 


0) FRINT 
10 RETURN 


TAB(X-LEN(X$))X$ 


SUGIFRE 
OSIZIONE DETERMINATA. 


LA FUNTEGGIARE 
a LONNAMENTI 


DEL NI 
X* DU FUNTEGGIATO 
VINCOLI: 
VALIDA FER XFINT(L/3}+L 


Dov 
(VINCOLO NUN CONTROLLATO, 


INIZIO ROUTINE 


A 
pe, 

M 
cuni 
€ 
sull 
sl) 
il 


MODIFICHE E 


COMMENTI PER 
LA ROUTINE 1 


ne su di un particolare computer potrà essere 
fatta più brevemente o sfruttando particolari 
caratteristiche dello stesso. Qualche computer 
potrà poi necessitare di alcune modifiche. Su 
tutto questo invitiamo i lettori a scriverci, sotto- 
ponendoci le versioni per il loro modello. Que- 
sta volta, intanto, abbiamo già ricevuto delle 
segnalazioni relative a PET, TRS-80 e Apple. 


PET e VIC 


La routine di punteggiatura funziona su tutti 
i PET e VIC per numeri con non più di nove 
cifre. Il signor Edilio Fazzi di Cengio, Savona, 
suggerisce alcune modifiche per permettere la 
punteggiatura di numeri con più di nove cifre. 


Ecco la sua routine. 


ITALIANA NEI NUMERT 


E LI INCOLUNNA A 


(INF) 
(IINFIUTÀ 
) PUNTEGGIATO 


CETTE TI 


Guida mondiale 
dei circuiti 
integrati TTL 


| 
L20000. ( SCONTO 20% 


agli abbonati 
fino al 28-2-83 


Il prontuario fornisce le equivalenze, le carat- 
teristiche elettriche e meccaniche di presso- 
ché tutti gli integrati TTL sinora prodotti dalle 
principali case europee, americane e giappo- 


nesi. 


| 

| 

| | dispositivi Texas, Fairchild, Motorola, Natio- 

| nal, Philips, Signetics, Siemens, Fujtsu, Hita- 
chi, Mitsubishi, Nec, Toshiba, Advanced Mi- 
cro Deviced, sono confrontati tra loro all’in- 


| terno di ogni famiglia proposta. 


| Per facilitare la ricerca o la sostituzione del 
dispositivo in esame, è possibile anche con- 
sultare il manuale a seconda delle funzioni 


svolte nei circuiti applicativi. 


Rappresenta, quindi, un indispensabile stru- 
mento di lavoro per tutti coloro che lavorano 


con i TTL. 


64 


La routine funziona solo per numeri che vengono 
introdotti come stringa: cosa succede se il numero da 
punteggiare è il risultato di un calcolo, e quindi è di- 
sponibile solo in formato esponenziale? 


TRS-80 mod. 1 


La routine di punteggiatura funziona per i numeri 
con non più di sei cifre. Il signor Rosario Bizioli di San 
Polo, Brescia, propone di aggiungere un segno dichia- 
rativo # di doppia precisione alla variabile N nelle ri- 
ghe 1 e 1090, e inoltre di aggiungere 0 CLEAR 100. 
Ciò permette di punteggiare numeri fino a 16 cifre. 


Apple II 


La routine di punteggiatura funziona per i numeri 
con non più di nove cifre, ma ai numeri 1000 e 
1000000 non viene aggiunto il punto dopo la prima ci- 
fra. Ciò dipende dal fatto che, contrariamente a PET e 
TRS-80, l'Apple non prevede l’aggiunta di uno spazio 
a sinistra nella trasformazione da numero a stringa. 
Per i calcolatori che funzionano come l’Apple, il si- 
gnor Alcide Andreatta di Castelcucco, Treviso, propo- 
ne di eseguire queste modifiche: 


1120 IFL > = 2 GOTO 1150 
1150 FOR I=L TO 2 STEP — 3 


Preghiamo coloro che ci scrivono 
di precisare in apertura di lettera a 
quale tipo e modello di computer si 
riferiscono e, se propongono modi- 
fiche ai programmi pubblicati, spe- 
cificare quali sono i vantaggi che ta- 
li modifiche consentono, o gli errori 
che tali modifiche correggono. 

Invitiamo inoltre tutti coloro che 
hanno modelli diversi di computer a 


sottoporci la versione della routine 
adatta alle loro macchine (in parti- 
colare Atari, ZX80 e 81, Atom, 
ecc.) 


Indirizzate a: 
PERSONAL SOFTWARE 
Via Rosellini, 12 
20124 Milano 


Per tutti 


dg È eo 


IL NUOVO COMPUTER A COLORI E SONORO. 


e musica. . | 
Parla il BASIC, ha un completo manuale in lialiano, 


Tutti possono utilizzarlo con facilità, 

e tutti possono acquistarlo senza sforzo. 

Costa incredibilmente poco ed è incredibilmente 
utile il VIC 20: un computer perfettamente 
attrezzato, con larga tastiera e tasti di funzione 
programmabili, con una memoria espandibile 
da 5K a 32K, con 24 colori e una grafica 
entusiasmante riproducibile da un normale 
televisore, con la capacità di produrre suoni 


e può utilizzare tutti i programmi — migliaia - 
tecnico-scientifici, didattici, professionali 

e ricreativi sviluppati sul sistema PET/CBM. 

Il VIC 20 è veramente per tutti. 


L. 495.000 + IVA | A DIVISION OF G.B.C 


ALLA SCOPERTA 
DEL TUO PRIMO COMPUTER 


Rote: 


di questo manuale. VA 
Cod. 319D pag. 164 


vor 2x0 e nuova ROM 


SCONTO 20% 
agli abbonati 
fino al 28-2-83 


GUIDA AL SINCLAIR ZX81 

ZX80 E NUOVA ROM Sommario 

di Rita Bonelli Introduzione - Il calcolatore - Installazione 
del calcolatore - La programmazione - 

I libro 


Il linguaggio BASIC - Come operare - Utilizzo 
della memoria - Linguaggio macchina - Esempi 
di programmi - Caratteri del sistema - 
Variabili del sistema - Scheda BASIC 
2X80 - Scheda BASIC ZX80 nuova ROM e ZX81 - 


Questa guida, con chiarezza, semplicità espositiva e ricchezza di 
esemplificazioni, risulta un vero e proprio strumento operativo per tutti 
coloro che vogliono avvicinarsi all'informatica in generale, e imparare la 
programmazione in BASIC, in particolare travalicando i tre calcolatori 


(ZX81, 2XB0, 2X80 nuova ROM) a cui fa riferimento. i .___ > _ Erori segnalati dalla 

L'ultimo capitolo, infine, riporta parecchi programmi e per ciascuno; macchina - Sistema operativo dello ZX81 - Sistema operativo dello ZX80 e 
vengono fomite, dove possibile, le diverse versioni (tra l'altro si parlerà di nuova ROM. 

file e di animazione delle figure). Cod. 318B pag. 262 LL. 16.500 


GRUPPO EDITORIALE JACKSON 
Divisione Libri 


Per ordinare il volume utilizzare l'apposito tagliando inserito in fondo alla 


PERSONAL SOFTWARE 


Generatore 
di labirinti 


di C. Bond 


ui è descritto un algoritmo 

soprendentemente corto 

che produce labirinti casuali 

di ogni formato direttamen- 
te sul video. Il programma può 
funzionare su ogni microcomputer 
che permetta la grafica indirizzata 
in memoria. Sono forniti dettagli 
per l'applicazione su PET/CBM. 
Un tipico labirinto generato da 
questo programma è riportato in fi- 
gura 1. 

Per comprenderne il funziona- 
mento, ci si riferisca al diagramma 
di flusso di figura 1 e alla lista del 
programma. Le spiegazioni se- 
DISne dovrebbero chiarire i detta- 
gli. 


Il campo di base 


L’algoritmo opera su un campo 
di base che deve essere generato 
sullo schermo prima della linea 200 
nel programma 1. Il campo consi- 
ste di un numero dispari di righe 
orizzontali, ognuna con un numero 
dispari di celle: una matrice rettan- 
golare. E conveniente pensare al 
campo come a una matrice bidi- 
mensionale con l’angolo superiore 
sinistro avente coordinate X=0 e 
Y=0, dove X è la direzione oriz- 
zontale e Y quella verticale. Il pro- 
gramma non usa le coordinate per 
identificare locazioni assolute, ma 
il concetto è utile nel configurare il 
campo. 


Dato che la cella in alto a sini- 
stra del campo ha coordinate 0,0 le 
coordinate terminali sia orizzontali 
che verticali dovranno essere nu- 
meri pari. Inoltre, il campo di base 
deve essere circondato da tutte le 
parti da celle di memoria i cui con- 
tenuti sono differenti dai numeri 
usati per identificare il campo. 
Cioè, se il campo è costituito da 
spazi inversi (reverse video), i nu- 
meri corrispondenti a questo carat- 
tere non devono essere visualmen- 
te adiacenti al campo. 

Ciò può succedere inavvertita- 
mente se la RAM di schermo e la 
ROM di sistema hanno indirizzi 
contigui. Una precauzione suffi- 
ciente consiste nell’evitare di copri- 
re l’intero schermo con il campo. 
Si lasci almeno uno spazio all’inizio 
e alla fine di ogni linea, e non si 
occupino la prima e l’ultima linea. 


Il generatore di labirinti 


La creazione del labirinto inizia 
ponendo uno speciale contrassegno 
in una opportuna casella d’inizio. Il 
programma qui presentato comin- 
cia sempre dalla casella corrispon- 
dente alle coordinate 1,1. Ogni cel- 
la con coordinate dispari va bene, 
purché sia all’interno del campo. 

Quindi, si sceglie una direzione a 
caso, generando un numero intero 
casuale tra 0 e 3. Questo intero, 


mediante una piccola tavola, deter- 
mina una direzione ed una corri- 
spondente cella distante esatta- 
mente due celle da quella attuale. 
Questa nuova cella viene esamina- 
ta (mediante PEEK) per vedere se 
fa parte del campo. Se sì, l’intero 
viene messo in questa cella come 
contrassegno, e la barriera tra esso 
e la cella attuale viene eliminata. 

Inoltre, il puntatore alla cella at- 
tuale viene ora spostato in modo 
che punti alla nuova. Questo pro- 
cesso viene ripetuto fino a che la 
nuova cella non supera il test, cioè 
non è una cella di campo. Quando 
ciò succede, il vettore di direzione 
viene ruotato di 90 gradi e il test 
viene ripetuto. Quindi, il cammino 
ricavato nel campo continua fino a 
che si raggiunge un “vicolo cieco”. 
Quando vi si capita, possiamo far 
uso dei contrassegni che sono stati 
tolti lungo la strada. 

Questi possono essere verificati 
per determinare da quale direzione 
veniamo, in modo da poter ritor- 
nare e ricercare nuovi cammini. Fi- 
no a che non se ne trovano, il pro- 
gramma torna indietro, un passo 
alla volta, cancellando il contrasse- 
gno che trova. Quando si può 
prendere una nuova direzione, il 
puntatore viene posizionato in 
quella direzione, e il processo con- 
tinua come sopra. 

Alla fine, il puntatore ritorna al- 
l’inizio, una condizione che viene 
individuata dal ritrovamento dello 
speciale contrassegno d’inizio (ora 
di fine). 


Il programma 


La lista 1 contiene il programma 
completo implementato sul PET, 
ma applicabile anche ad altre mac- 
chine. La tavola delle direzioni 
predisposta nelle linee 100 e 110 
converte un intero in un offset 
d’indirizzo. In questo caso (scher- 
mo a 40 colonne) ci interessa fare 
passi di due celle a destra, in alto, 
a sinistra o in basso. Gli indirizzi di 
memoria di queste celle differisco- 
no da quello della cella attuale per 
2, -—80, —2 e 80 rispettivamente. 
Per computer con display di 64 co- 
lonne, 1’80 deve essere sostituito da 


67 


128. 

La linea 120 contiene le variabili 
dipendenti dalle macchine. SC è 
l'indirizzo di memoria dell’inizio 
dello schermo. 

Le linee 130-160 stabiliscono il 
campo di base sullo schermo. Per il 
PET scegliamo 23 righe di 39 co- 
lonne ognuna. Il resto del pro- 
gramma traccia il labirinto, nel mo- 
do discusso precedentemente. La 
linea 310 è semplicemente un pun- 
to di stop che evita lo spostamento 
dello schermo. 

Può non essere immediatamente 
ovvio che questo algoritmo produ- 
ca un labirinto con un unico cam- 
mino non banale tra due punti, o 
che il labirinto venga sempre riem- 
pito completamente, ma lo si può 
dimostrare. Sebbene non sia que- 
sto il luogo adatto per la dimostra- 
zione, può essere interessante no- 
tare che per un labirinto di qualun- 
que formato ci sono esattamente 


REM 
REM 
REM GENERATORE DI 
REM = 
REM 
REM 
REM 
Mx BE3ZtIt32TTTTTFATTTZEIZIZZEZELELELEZTELETE] 
100 DIM A(3: REM FREFARA LAT DIFEZIONI 
110 ACO) FEM 


\LRZEZESSTFTETTCTTALERZZELERELEZEZZZTCELETUT] 


* 

+ 

* 

VERSIONE FE 1oionti * 
* 

* 


at VALORI 
HEFMO DI 

120 WL=160: HL=3 

FEM CANCELLA LO 
DEL LABIFINTO 


SCHEEMN E 


NEXT hl: 

NEXT I 

REM GENERA IL LABIRINTO 

FOKE A,4 

J=INT(RND(1) 84): X=d 

B=A+4(J): IF PEEK(B)=bL THEN FOKE B,J: 
AFA (I) A=E: GOTO O 

HEN 230 

474 THEN AZAZA (I): 


FOKEE 


GOTO 220 

O REM LABIRINTO FRONTO! 
PREMUTO LIN TA: 
GET C$: 


ASFETTA CHE VENGA 


THEN 2IO 


Programma 1. 


1000 REM ATTRA 


celle vuote nel labirinto completa- 
to, dove H è il numero di celle in 
ogni riga del campo e V il numero 
delle righe. 


Una interessante caratteristica di 
questo algoritmo è che funziona 
ugualmente bene in ceîti tipi di 
campi non rettangolari. Campi ad 
U o campi con buchi sono possibi- 


li, sempre che siano rispettate alcu- 


1010 FOKE A,81: 

1020 B=A+A(J)/2: IF FEEK(B) 
B,81: FOEE A,HL: A=B: dl 

1020 J=(J-1)-4%( ): GOTO 


N PORE 
+4%(J51) 


Programma 2. 


sce alla 


“regola della mano 


ne regole. Basta assicurarsi che le 
coordinate delle celle in alto a sini- 
stra e in basso a destra di ogni 
“foro” siano coppie di numeri di- 
spari. Inoltre, se c’è un’unica riga 
di celle tra un “foro” e l’esterno 
del campo, può essere rimossa. 
Vedi la figura 2. 


Il topo 


Con piccole modifiche il genera- 
tore di labirinti può diventare un 
topo artificiale. Il programma 2 de- 
scrive una routine che può esere 
aggiunta al generatore di labirinti e 
che crea un topo che attraversa il 
labirinto senza fine. Il topo obbedi- 
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sinistra” quando è possibile la scel- 
ta di una direzione. In altre parole, 
quando si trova alle prese con un 


punto di diramazione, esso, se pos- 
sibile, gira a sinistra. Altrimenti, 
va avanti. Se non è possibile alcuna 
scelta, torna indietro. 


Fig. 1. 


Fig; Di 


_ ni Linguaggi vicini all'uomo 


== 


965 BASIC 
1960ALGOL 


9. UDUI 
57 FORTRAN 
Machine language 


Il nuovo non linguaggio di programmazione che ha reso 

-il computer accessibile a tutti. 

— Infatti la programmazione rappresenta un’ostacolo 

a noN indifferente alla diffusione del personal computer: 

i PIPS è un passo enorme nella soluzione di questo problema 
permettendo l'utilizzazione del computer senza saper programmare. 
Anche un principiante può utilizzare 

__personal computer SORD 


-Si cercano rivenditori per zone libere 


cattaneos.si 


via Cesarea, 9/4 - 16121 Genova (Italy 
Tel (010) 595859751. Telex 971295 


Importatore esclusivo 


[ace {era | a 


Sord computer systems, inc. 


SORDM283 


Per maggiori informazioni inviare il tagliando a 


Fiat Auto S.p.A. 


128K Ram - Video 12"-14" verde-arancio-colore E i ear Cobol cattaneo system spa via cesarea 9/4 - 16121 genova 
2 porte seriali -1 porta parallela - Basic - interprete - Colt dia ru-----------------7---- 
Standard il nuovo modo di programmare: PIpS = — 4 = 
nome 
Lit. 4.900.000 +1.V.A. Prezzo “tutto compreso a = i indirizzo 
Garanzia per un anno e speciale polizza assicuri = celto da Ì cap città 
tel 
4 professione 
1 
I 
' 


PICCOLI ANNUNCI 


Scambio programmi di tuttii generi, ma specialmen- 
te giochi per il nuovo personal computer della Texas 
Instruments: il TI 99/4A 

Stefano Oggioni - Via Verdi, 31 - Bussero (MI) - Tel, 
9500061 diverrà 95039061) 


Se possiedi un PET e vuoi scambiare programmi 
inviami una tua cassetta contenente i tuoi ed io la 
contraccambierò con i miei sia gestionali che giochi. 
Luigi Menghi - Via Maranello, 7 - 00125 Acilia (Roma) 
- Tel. 06/6069235 


Scambio programmi gestionali, magazzino per 
PET/3032, ingegneria civile ecc. con programmi 
completi per paghe e stipendi con gestione contratti 
di lavoro diversi. Telefonare ore 19-20. 

Paolo Stella - Via Strada 62, 28 - 67100 L'Aquila - Tel. 
23273 


Cerco utenti di VIC-20 per scambio informazioni, 
materiale, programmi, etc. Assicuro massima serietà. 
Ernesto Bastoni - Via Rocca D'Antfo, 2 - 25100 Bre- 
scia - Tel. 030/305906 


Vendo ZX81-ZX80 nuova ROM bellissimi programmi 
veramertte originali molto elaborati (i migliori dei miei 
due anni di hobby) vendo ad un prezzo ridicolo: un 


nastro BASF /TDK 60 minuti colmo di programmi per 
sole L. 12.000 compreso costo nastro e postali! Mera- 
vigliosi programmi elaborati da me per cui garantisco 
soddisfazione, a meno di 500 lire l'uno. 

Bruno Del Medico - Via Torino, 72 - 04016 Sabaudia 
(LT) 


Vendo test psicodiagnostici solo a medici o psicologi 
che comprovino titolo di laurea. Sono scritti in MBA- 
SIC (anche per CP/M) e forniti in dischi 5". 
Vincenzo Colaciuri - Via Monte Bianco, 10/12 - 
24020 Scanzorosciate (BG) - Tel. 659049 


Scambio soft ZX81, zona Modena. 
Manfredini - C.P. 25 - Modena 


Cerco possessori di VIC 20 che abbiano sviluppato o 
abbiano intenzione di sviluppare programmi in L.M. 
GS02 o che abbiano “esplorato” la pagina della me- 
moria 

Peppe D'Ottavo - Via Donati, 10 - Milano - Tel. 
02/425493 


Vendo cassetta programmi gioco per VIC 20 e altri 
programmi chiedere lista a 

Claudio Marchiondelli - Via Libertà. 3 - 33010 Raspa- 
no (UD) 


Scambio software per VIC 20 - vendo ZX80 + 16 
Kbyte RAM + alim. + cavi + garanzia da convalidare 
+ istr. bilingue - assemblato in fabbrica - Vinto ad un 
concorso L. 300.000 usato 10 giorni 

Amos Aimi - Via Zanella. 11 - 43015 Noceto (PR) 


Cambio/vendo programmi per VIC 20 vendo cas- 
setta con 5 giochi per VIC 20 L. 15.000. Per VIC 20 
vendo cass. con equo canone + isolamento termico 
L 15.000 

Maurizio Mellone - Via Sabbionara. 9 - 36061 Bassa- 
no del Grappa (VI) - Tel. 20015 


Cerco persone disposte a scambiare programmi e 
idee sul Sinclair ZX-81. Telefonare o scrivere a: 
Paolo Ghedini - Via Brioschi, 33 - 20136 Milano - Tel. 
02/8372839 


Vendo programmi per ZX computers, assolute novi- 
tà, registrati su cassetta: favoloso scacchi II 7 livelli 
difficoltà - velocissimo - scacchiera grande L. 15.000 
- Mazogs eccezionale grafica e movimento L. 12.000 
- Scramble il nuovo gioco che pilota la sound boardL. 
9.000 - Galaxian - asteroid e tantissimi altri. Elenco a 
richiesta 

Massimo Soncini - Via Monte Suello, 3 - 20133 Milano 
- Tel. 02/727665 


Atari Club per scambio programmi, più di cento pro- 
grammi. animazione grafica. musica. games. uno più 
favoloso dell'altro scrivetemi per saperne di più. W gli 
ataristi!! 

Marco Rosati - Via Giovanni XXIII - 10040 Caprie (TO) 


Cambio programmi per Apple Il e TRS/80, gestio- 
nali. utilities. giochi vari. Inviare lista. invierò la mia 
Giovanni Carrella - Via Felline. 11/C - 84100 Salerno 
- Tel, 089/354854 


Cambio/vendo software per Apple Il 
Marco Montresor - P.zza C. Alberto. 25 - 37067 Valeg- 
gio S/M (Verona) 


| PICCOLI ANNUNCI 


PERSONAL 
SOFTWARE 


Sel un lettore di PERSONAL-SOFTWARE e vuoi entrare in contatto con tutti gli altri lettori per comperare, cambiare o 


vendere software? Spedisci questo tagliando a Gruppo Editoriale Jackson - Via Rosellini, 12 - 20124 Milano 


l 
L a La se se, e sa Le (a 


| 
| 
| 
| 
| 
| 
| 
| 


LS FA QI ER N HR PES (RI 
| Nome.... 
| Via 
Città 


. Cognome .. 


C.A.P. 


Tel 


pi 
per] 
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Dove trovare il 99/4A 


della Texas Instruments 

SANREMO UNELCO 0184/883832 © SAVONA 
SPERATI :019/25875 @ IMPERIA TELEROS 0183/ 
24314 © GENOVA CLU 0170/510355. COMPUTER 
CENTER 010/300797. BENNATI 010/298476. COM- 
PUFFICIO 010/564493. FOTOMONDIAL 010/280322. 
LA NASCENTE 0170/291641. SALVIATI 010/595750. @ 
LAVAGNA (SP) COMPUTER CENTER 0185/314142 
® LA SPEZIA BARBAGALLO 0187/35275 ® NOVI 
LIGURE (GE) ELCAMA 0143/743687 © CUNEO 
CASATI 0171/3714 @ BRA (CN) MAGAZZINI BONA 
0172/412778 © ALESSANDRIA VERONELLI 0131/ 
53462 @ TORINO MISTER ELECTRONICS 011/510353. 
ABA 011/389328. CSC 011/532730. CELID 011/540875. 
ELEDRA 3011/309911]. MECCANOGRAFICA TORINE- 
SE 011/238803. LA MERIDIANA 011/7497752 ® BIEL- 
LA (VC) TEOREMA 015/777179 © NOVARA IMES 
0321/24208 @ AOSTA LAGOVAL 0165/43929 @ 
VARESE BERNASCONI 0332/29186 @ GRAVINA 
(VA) SCF 0332/240250 @ GALLARATE (VA) 
PROFIT CENTER 0331/799019. SED 0331/795735 
BERGAMO FRABERT ELETTRONICA 035/248362 @ 
ALBINO (BG) IL DATO 035/752225 @ BRESCIA 
VILLA E VENTURINI 030/345591. VIGASIO 030/53588 
® MILANO KOH..NOOR HARDTMUTH 02/6972. 
CUSL 02/804967. DELTRON 02/2360015. ELEDRA 35 
02/349751. GBC 02/2041051. GBC 02/490335. Gi- 
GLIONI 02/2360397. GIGLIONI 02/654906. IL PUN- 
TO EDP 02/666503. JENZI 02/808595. VEMA ELET- 
TRONICA 02/6071793. MARCUCCI 02/7386051. SU- 
PERGAMES 02/2716343. TEXAS INSTRUMENTS 02/ 
804938. © CINISELLO BALSAMO (MI) GBC 
02/618180] @ MONZA (MI) EURO SYSTEM INFOR- 
MATIKA 039/365038 @ S. GIULIANO MILANE. 
SE (MI) PROFIT CENTER 02/9846081 © PAVIA MA- 
RUCCI 0382/227160 @ BOLZANO ELECTRONIA 
0741/2663] @ VERONA BIANCHI 045/590011. 
MARCHIOTTO 045/32233 @ VICENZA RCE 0444 
35554 @ PADOVA CALDIRONI 049/657544. CAPO- 
VILLA 049/28998. ELEDRA 35 049/655488 RCE 049 
662364. RCE 049/44306 @ CITTADELLA (PD) 
BERTO 049/590959 @ VENEZIA CAPUTO 041/ 
36836 @ MESTRE (VE) PACINOTTI 041/57716 @ 
TREVISO RCE 0422/262571 @ PORDENONE BRI- 
SOTTO 0434/2263 @ UDINE MOFERT 0432 
294620 @ FELETTO UMBERTO (UD) FANTON 
UDINE 0432/6809] @ TRIESTE COMPUTER CENTRE 
040/574090 @ PARMA FABBRI MAURIZIO 0521 
27093. BELLETTI 0521/21267 € REGGIO EMILIA 
IMPEL 0522/143745. COMPUTER CENTER 0522/31965. 
FICARELLI 0522/49604 @ MODENA DELLA CASA 
059/210385. IMPEL 059/225819. MARI MAURO 059 
225096. MASETTI ELETTRONICA 059/2798017. ORAM 
059/216109 @ BOLOGNA ELEDRA 35 051/307781. 
GOZZI GIANNI 051/239635. MORINI È FEDERICI 051 
520305 MINELLI 051/384547. BORSARI-SARTI 051 
861060 © FERRARA IL CENTROCONTABILE 0532 
40350 @ RAVENNA FRATELLI GAMBI 0544/22 938. 
POLITECNICA BAGNOLI 0544/32364 @ FORLÌ TELE- 
RADIO 0543/25009 @ CESENA (FO) MIRRI ITALO 
0547/24025 PISTOIA CDE 0573/31669 @ MON. 
TECATINI TERME (PT) NANNINI 0572/767801 
® AVENZA (MS) CDE 0585/59006 @ VIAREG- 
GIO (LU) CDÉ 0584/49244 @ PISA L'ELETTROGRA- 
FICA 050/24220 @ FIRENZE CASA DELLO SCONTO 
055/363141. BRESCHI 055/262696. PAOLETTI FERRE- 
RO 055/294974. BIERRE 055/413113 @ SESTO FIO- 
RENTINO (FI) CECCHUTI 055/442698 @ AREZ- 
ZO VIERI 0575/23227 @ SIENA BROGI 0577 
280956 @ LIVORNO L'ELETTROGRAFICA 0586 
808031 e PIOMBINO (LI) TOMI 0565/30270 @ 
GROSSETO ELECTRONIC MARKET 0564/411090. 
ELIOGRAF 0564/21066 @ PERUGIA M.T.E. 075 
21269. COMER 075/74000 @ ANCONA LANARI E 
PAOLETTI 071/82461. MARCHETTI 071/28252 @ JESI 
(AN) SIGNORETTI 0731/52403 © FALCONARA 
(AN) AMBROGINI 07)/91007? e FABRIANO 
(AN) CARDINALETTI 0732/3015 @ ASCOLI PICE- 
NO NARDONI 0736/50068 @ FERMO (AP) FOTO 
TONICI 0734/2137 © MACERATA DOMIZI0733 
49583 @ L'AQUILA GRIMALDI O. 0862/20289. 
SEAD 0862/28585 @ ROMA ELEDRA 35 06 /8127324. 
FBM 06/3960152. GR ELETTRONICA 06/3598112. TE- 
MAX ITALIA 06/4952623. RADIOVITTORIA 06 
3963642. CORTANI 06/461277. SUONOVIDEO 06. 
6374248. ELDO 06/4387061. ELDO 06/710493. ELDO 
06/299394. ELDO 06/5560995. ELDO 06/8312706. 
ELDO 06/4745412, INFORMATIKA 06/837274. INGE- 
GNERIA 2000 06/4744169. DIEMME 06/7853341. DE 
ANGELIS 06/4743983. NOVEL 06/6783424. TECNO- 
MEC 067573305 @ NAPOLI CENTRO SANDOZ 081 
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Home Computer Texas Instruments. 
bile Software ineguagliabile. 


Prezzo imbatti 


Quando scegliete un Home 
Computer Texas Instruments scegliete 
un “vero” computer. Un computer che 
può crescere con voi e con la vostra 


famiglia. Un computer cori cui potete 
giocare, inventare, studiare... insomma, 
un sistema che aiuta la vostra fantasia a 
crescere. 


Tutto ciò è possibile grazie alla nostra 
gamma di software: dai videogiochi 
come gli Invaders, al calcio, agli scacchi, 
ai linguaggi di programmazione evoluti 
come l’“Editor Assembler” e l'“UCSD - 
PASCAL”. Molti dei nostri programmi 


sono in forma di moduli di comando 


> > M 
did State Software", una esclusiva 
Texas Instruments. Per utilizzarli, dovete 


solo inserirli. E il gioco è fatto. 
Se poi volete imparare a generare i 


vostri programmi, il TI-99/4A consente 
anche questo: il linguaggio TI-BASIC è 
immediatamente a vostra disposizione in 


consolle e il relativo manuale vi guiderà 


passo dopo passo nel mondo della 


programmazione. E quando vorrete 


TEXAS INSTRUMENTS TI-99/4A 
Caratteristiche tecniche 

TMS 9900 16 BIT 

16 colori, alta risoluzione 

TI-BASIC (disponibile in consolle) 

Extended Basic, UCSD - PASCAI 


Microprocessore 
Grafic 
Liù 


TI-LOGO, Assembler 

Memoria Capacità di memoria interna 
disponibile all'utente 16 K RAM 
espandibile fino ad un massimo di 
I10 K ROM/RAM 

Tastiera Standard tipo macchina da scrivere 

Software 1000 programmi tra cui 


în tutto il mondo 


Capacità vocale 
Solid State Sì 


TM: marchio registrato Texas Instrur 


ampliare il vostro sistema, potrete 
disporre di numerose periferiche quali 
l'espansione di memoria, l'’RS232, il 
sistema di memoria a dischi, il 
sintetizzatore della voce ed altre ancora 
che, grazie al Peripheral Expansion 
System, unico nel suo genere, possono 


essere immediatamente e facilmente 


inserite ed utilizzate. 
Vi sembra troppo? Provate l’Home 
Computer Texas Instruments dal 
rivenditore più vicino. 
Per 499.000 lire (IVA vi) 


esclusa), non troverete niente 


ndo di offrirvi tanto. 


TEXAS 
INSTRUMENTS 


ing 


GUIDA ALLA PROGRAMMAZIONE IN ASSEMBLER Z80. 1! libro 


una guida introduttiva alla programmazione assembler attraverso una 
SUL PICO COMPUTER progressione di esercizi. Il E CIERIORI usato è il Picocomputer, che impiega il 
di Dante Del Corso microprocessore 280 di cui non viene volutamente fomita una descrizione | 0 
generale. ha 
| programmi riportati possono essere facilmente adattati ad altri sistemi 280. 
© 8080. Di ogni programma viene fomito il listato completo e quindi non 
occorre disporre di assemblatori o altri supporti di sviluppo, oltre il Pico stesso, 
‘© piastra equivalente. 
Sommario 


- ma 6 n n Sistema PICOCOMPUTER - Esercizi - Tabella delle istruzioni Z80 - Standard 
| Mubus - Tastiera e display; tecniche di interfacciamento - Scheda CPU; 
\ Î criteri di progetto e descrizione dell'hardware 
1! Ù i Scheda CPU: montaggio e collaudo 


Scheda CPU: estensioni - Programma monitor. 


T Vit tnt 
Interfaccia cassette - Tecniche di 
interfacciamento su Mubus. 
x Cod. 330D pag. 138 L.9.000. 


PROGRAMMARE IN ASSEMBLER 
di Alain Pinaud |? 


Il libro , a 
Una schiera sempre più vasta di 
di personal computer vorebb 
in assembler, mc esita pere] 
e necessitante di lunghi studi pra 

Jossibile invece, con questo libro in poco: C È 
SERE quei principi base validi per qualsiasi mi SCONTO 20% 
32 0 64 bit. Poiché , però bisognava far riferimento ad un'assernt agli abbonati 
esistente, si è scelto quello dello 280, sia perché tra i più diffusi, sia pet x BETS ci 28-2-83 
dotato del set di istruzioni più ampio nella sua categoria, n 


Sommario “ 
Definizione e richiami di nozioni di base - Introduzione all'assembler - 
Istruzioni di un assembler tipo 280 - Pseudoistruzioni e Macroistruzioni - 


Tecnica pratica dell'assembier - Il software di supporto all'assemblatore - Lo 
aeiazeni con nguagoi evo Lo moiemalca certnemetco. —‘GRUPPO EDITORIALE JACKSON 


e__0_® ° © 
Cod. 329 pag. 160 L 10.000 Divisione Libri 


ista. 


Per ordinare il volume utilizzare l'apposito tagliando inserito in fondo alla ri 


DI 
i) 


î 


Pi; 
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PERSONAL SOFTWARE 


Comunicazione 
da PET a PET 


attraverso la ‘User Port? 


e voi, 0 voi e un vostro amico, 
Gice accesso a due PET, pro- 
babilmente avrete desiderato 
collegarli assieme e scambiare dati. 
Il bus IEEE interno non si può 
usare,in quanto entrambi i PET so- 
no bus controller ossia devono es- 
sere connessi solo con dispositivi 
slave cioè che eseguono gli ordini 
del bus controller. 

Potreste acquistare molti tipi di 
dispositivi di ingresso/uscita: seria- 
li, paralleli o di tipo modem, ma il 
sistema più semplice è usare la user 
port interna, ossia la porta paralle- 
la disponibile per l’utilizzatore del 
PET. Ecco come fare usando solo 
12 fili e un semplice programma in 
Basic. 

Per prima cosa diamo un’occhia- 
ta all'hardware necessario. 

Il connettore della user port è 
posto sul retro del PET; guardando 


O REM *XX*FROGRAMMA N. 149%% 
LA FORTA COME USCITÀ 


REM PREPA 
O POKE 59459, 255 


di J. Winn 


il PET da dietro, il connettore del- 
la porta parallela è quello centrale 
e i contatti sono posti nella fila in- 
feriore e sono identificati dalle let- 
tere dalla A alla N, con chiavi di 
polarizzazione tra i contatti A e B 
e tra Le M. Ae N sono contatti di 
massa, da C a L ci sono i contatti 
della porta vera e propria (corri- 
spondenti ai bit di una cella di me- 
moria), mentre il contatto B corri- 
sponde a CA1; esso viene usato 
per segnalare al PET la presenza di 
dati da memorizzare. Il contatto 
M, chiamato CB2, va collegato a 
CA1 del PET che riceve e control- 
la anch’esso il trasferimento dei da- 
ti. Per interconnettere i due PET 
dovrete collegare A con A, N con 
N, i contatti da C a L ai corrispon- 
denti sul secondo PET, ma i fili B 
e M vanno incrociati: B del primo 
con M del secondo e viceversa. I 


REM CHIEDE UN CARATTERE 
INFUT"BATTI UN CARATTER 
REM TRASMETTE IL CARATTI 


O FOKE 59457,ASC(A$) 

O REM SEGNALA AL RICEVITORE CHE IL DATO E° DISFONIRII E 
O FOKE 59468,FEEF (59468) OR 
O FOKE 59468, FEEF (594689) AND Fi OR 192 

O REM ASPETTA LA CONFERMA DAL RICEVITORE 


4 


IF (FEEK (59469) AND 2): >? THEN 90 


100 GOTO 30 


cavi devono avere una lunghezza 
massima di sei metri onde evitare 
che i segnali in circolazione venga- 
no disturbati. 

Per controllare le linee di ingres- 
so/uscita vengono usate alcune 
istruzioni PEEK e POKE. In ogni 
momento, un solo PET trasmette e 
l’altro riceve, anche se entrambi 
sono in grado di fare tutte e due le 
cose. Per spedire un dato, il 
“trasmettitore” per prima cosa atti- 
va le otto linee dei dati, poi segna- 
la attraverso CB2 che il dato è di- 
sponibile. Il “ricevitore”, quando 
sente CA1 cambiare stato logico, 
carica il dato in memoria e segnala 
attraverso CB2 che ha ricevuto il 
byte ed è pronto per il prossimo. 

Supponiamo di dover mandare 
un byte da un PET all’altro. Il pro- 
gramma 1 funziona da trasmettito- 
re e il programma 2 da ricevitore. 

La riga 20 mostra come in en- 
trambi i programmi viene control- 
lata la direzione dei dati. La riga 
40 del programma che trasmette 
manda un byte (ASC(A$)) alle li- 
nee di uscita. Nel frattempo il rice- 
vitore è bloccato sulla riga 40 e 
aspetta che il secondo bit della lo- 
cazione di memoria 59469 vada a 
uno anziché rimanere a zero. Il se- 
gnale è mandato (da CB2 del tra- 
smettitore a CA1 del ricevitore) 
tramite le righe 60 e 70. La riga 60 
mette a uno i tre bit più significati- 
vi della locazione di memoria 
59468 (lasciando gli altri bit inalte- 
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REM X*X*FPROGRAMMA N. 2XKkXx* 
REM FREFARA LA FORTA COME INGRESSO 


FOKE 59459,0 


REM ASPETTA IL DATO 
AND 2)<>2 


IF (PEEK (59469) 


REM LEGGI IL DATO 


D=FEEK (59457) 


THEN 40 


REM SEGNALA DI AVER RICEVUTO IL DATO 


POKE 
REM SCRIVI 


FRINT CHR$(D) 


100 GOTO 30 


rati). La riga 70 rimette a zero il 
sesto bit e a uno il settimo e l’otta- 
vo bit: questo fa cambiare stato per 
un attino a CB2 segnalando l’avve- 
nuta trasmissione. La riga 90 bloc- 
ca poi il trasmettitore fino a quan- 
do il ricevitore segnala di aver rice- 


59468, FEEK (59468) 
FOKE 59468,FEEK (59468) 


OR 
AND 


24 
31 OR 192 


IL CARATTERE RICEVUTO 


vuto il dato trasmesso. Il ricevitore 
fa questo con le righe 70 e 80 poi 
scrive il carattere ricevuto sullo 
schermo e aspetta il prossimo dato. 
Il trasmettitore riceve il segnale del 
ricevitore e richiede un altro carat- 
tere da trasmettere. 


10 
12 
15 
20 
30 
40 
45 
so 
60 
70 
80 
25 
90 
95 


100 OO=LEN(A$): 
110 
120 
130 
140 
150 
160 


FEM *XKXFROGRAMMA N. 
REM TRASMETTITORE EVOLUTO (VE IONE FER NUOVE ROM): 
OME INGRESSI 
PRE LA FRIMA VARIABILE 
di OO NEL BUFFER 


IL DATO 
POKE 59459,255: REM FREFARA LA FORTA COME USCITA 
REM MANDA IL CARATTERE DI SINCRONIZZAZIONE 
D= ("%")s GOSUB 2000 
FRINT"PRONTO A TRASMETTERE 
REM SCRIVI IL CARATTERE RIC 
INFUT "SCRIVI UNA STRINGA":A$ 
REM TRASMETTE LA LUNGHEZZA DELLA STRINGA 
GOSUB 1000 
FOR I=1 TO Q0 
D=ASC (MID$(A$,1,1)) 
GOSUR 2000: REM MANDA UN CARATTERE ALLA 
NEXT 
INFUT"QUANTI NUMERI A CASO":N 
OD=N: GOSUB 1000: REM TRASMETTE N 


FRINT"FPREMI 
JTO 


SHIFT® FER FERMARMI" 


VOLTA 


170 FOR I=1 TON 


180 

190 

200 

999 

1000 
1010 
1020 
1030 
1040 
1050 
2000 
2010 
ZOO 
ZOZO 
2040 
2050 
2055 
2060 IF 
2O7O 
2080 
2990 
3000 


QO=RND (1) 
GOSUB 1000: 
NEXT 

END 

REM TRASMETTE UN NUMERO 
FOR J=0 TO 4 
D=PEEK (50+3) 
GOSUE (Ei 
NEXT 

RETURN 

REM TRASMETTE UN BYTE 

FOKE 59459,D: REM MANDA IL BYTE 
REM SEGNALA *DATO FRONTO” 
FOKE 59468,FEEk (59468) OR 
FOKE 59468,FEEK (59462) AND OR 192 

REM ASFETTA CONFERMA DAL RICEVITORE 

REM FERMETTE DI INTERROMFERE LA TRASMISSIONE 
( (PEEkK (59469) AND 2) 2) AND (FEEL (SH) 1) 
IF FEEKE (SH)=1 THEN 3000: REM SI FERMA 
RETURN 

REM SE INTERROTTO SI FERMA 
PRINT"TRASMISSIONE INTERROTTA": 


REM TRASMETTE IL NUMERO 
IN VIRGULA MOBILE 


REM MANDA DO UN BYTE ALLA 


VOLTA 


THEN 2060 


G0T0 999 


La maggior parte delle applica- 
zioni richiede di poter trasmettere 
più di un carattere alla volta. Per 
trasmettere un’intera stringa di ca- 
ratteri o un numero in virgola mo- 
bile abbiamo bisogno di program- 
mi più sofisticati ma basati su un 
identico principio. 

Per trasmettere una stringa biso- 
gna mandare per prima la lunghez- 
za della stringa, dopo di che si può 
trasmetterla un carattere alla volta. 


È importante la 
sincronizzazione tra 
trasmettitore e 
ricevitore 


Per trasmettere un numero in 
virgola mobile, il modo più sempli- 
ce sembra sia di usare una variabile 
Basic in una locazione di memoria 
conosciuta come viene fatto nel 
programma descritto più avanti. 

Sorgono adesso altre due que- 
stioni. La prima è la sincronizza- 
zione iniziale tra il trasmettitore e 
il ricevitore. Probabilmente il me- 
todo migliore consiste nel mandare 
uno speciale carattere che funzioni 
da “preambolo” proprio per pulire 
il ricevitore da ogni dato casuale 
eventualmente presente. La secon- 
da questione riguarda la possibilità 
di interrompere il programma se 
c'è qualcosa che non funziona: la 
linea 90 del trasmettitore e la linea 
40 del ricevitore avrebbero potuto 
essere scritte utilizzando l’istruzio 
ne WAIT, ma non essendo possibi- 
le interrompere questo tipo di 
istruzione che togliendo la corrente 
ai circuiti, ciò sarebbe stato un po’ 
pericoloso! 

La maniera migliore di interrom- 
pere un programma senza usare il 
tasto STOP consiste nell’usare il 
tasto SHIFT nel modo descritto 
più sotto. 

I programmi 3 e 4 sono una solu- 
zione più elaborata per mandare 
stringhe o numeri in virgola mobile 
qualsiasi. Entrambi usano il tasto 
SHIFT per segnalare una sospen- 
sione del programma. (Con le vec- 
chie ROM la locazione di memoria 
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516 è a zero se il tasto SHIFT non 
è premuto e a uno se invece è te- 
nuto schiacciato. Con le nuove 
ROM questa locazione è la 152.) Il 
trasmettitore per prima cosa man- 
da un % come preambolo per sin- 
cronizzare il ricevitore. Il carattere 
è scelto arbitrariamente ma do- 
vrebbe essere il più possibile insoli- 
to nella trasmissione normale. 

La variabile in virgola mobile, 
chiamata QQ in entrambi i pro- 
grammi, deve essere la prima varia- 
bile definita nel programma. Que- 
sto perché così la sua posizione in 
memoria può essere trovata facil- 
mente: all’inizio dell’area riservata 
alla memorizzazione delle variabili 
si trovano due byte per i due carat- 
teri che formano il nome della va- 
riabile seguiti da cinque byte che 
rappresentano il vero e proprio nu- 


REM XXX*FROGRAMMA N. 4X4XKK 


mero in virgola mobile. L’area ini- 
zia a: 


256*PEEK(43) + PEEK (42) 
per le nuove ROM 

256*PEEK(125) + PEEK(124) 
per le ROM originali 


Perciò la variabile SQ contiene 
la locazione, aumentata di due, do- 
ve inizia il numero da trasmettere. 

I dati sono trasmessi o ricevuti 
tramite le subroutine a 1000 e 
2000. A cominciare da 1000 c’è la 
subroutine che trasmette o riceve i 
numeri in virgola mobile (QQ); la 
subroutine in 2000 trasmette o rice- 
ve un byte alla volta (D). 

Per interrompere la trasmissione 
o la ricezione bisogna che teniate 
premuto il tasto SHIFT fino a che 
il programma non salta alla so- 
broutine 3000. Sia il trasmettitore 


REM RICEVITORE EVOLUTO (VERSIONE FER NUOVE ROM) 
Q0=0: REM DO DEVE ESSERE LA FRIMA VARIABILE 


SO=PEEK (42) +256%FEEK (43) + 
SH=152: 


REM INDIRIZZO DI OG NEL BUFFER 
REM INDIRIZZO DEL FLAG SHIFT" 


POKE 59459,0: REM PREFARA LA PORTA COME INGRESSO 


REM ASFETTA IL CARATTERE DI 
FOR I=1i TO 3: GOSUE 2000 
THEN 80 


SINCRONIZZAZIONE 


PRINT"SINCRONIZZAZIONE FALLITA": END 
FRINT"PRONTO A RICEVERE": PRINT"PREMI "SHIFT" PER FERMARMI" 
GOSUB 1000: REM LEGGE LA LUNGHEZZA DELLA STRINGA 


REM LEGGE UN BYTE ALLA VOLTA 
FOR I=i TO 00: GOSUB 200 
A$=A%+CHR$ (D): REM RICOSTRUI 


As="": 


NEXT 
PRINT"RICEVUTO "3: A% 


E LA STRINGA 


REM LEGGE QUANTI NUMERI VERRANNO TRASMESSI 


GOSUB 1000: N=00 
FOR I=1 TON 


GOSUE 1000: REM LEGGE I NUMERI 


REM RICEVE UN NUMERO IN VIRGOLA MOBILE 


FOR J=0 TO 4 
GOSUB 2000 


REM LEGGE UN BYTE ALLA VOLTA 


POKE SO+J,D: REM RICOSTRUISCE 00 


NEXT 
RETURN 
REM RICEVE UN BYTE 


REM ASFETTÀ IL DATO E FERMETTE L’IMTERRUZIONE 


IF ((FEEK(59469) AND 2) 
IF FEEK (8H)=1 THEN 3000: 


AND (FEEF (SH) 1) 
M SI FERMA 


THEN 2 


D=PEEK (59457): REM LEGGE IL BYTE 


REM SEGNALA ?DATO RICEVUTO” 


FOKEE 59468,FEEK (59468) OR 


FOEE 59468,FEEK (59468) AND 


RETURN 


REM SE INTERROTTO Sì FERMA 
FRINT"RICEZIONE INTERROTTA": 


76 


GOTO 999 


che il ricevitore devono essere fer- 
mati separatamente, ma non ha 
importanza quale dei due viene 
fermato per primo. 

La velocità di trasmissione è di 
circa dieci byte al secondo. 


Linguaggio macchina per 
trasferimenti più rapidi 


Per ottenere ritmi di trasferi- 
mento più veloci bisogna ricorrere 
al linguaggio macchina: il program- 
ma 5 è una versione in linguaggio 
macchina dei programmi Basic 3 e 
4, ma implementati in maniera leg- 
germente differente. 

La riga 10 abilita la variabile 
D% a ricevere singoli byte: ancora 
una volta deve essere la prima va- 
riabile definita nei programmi e le 
istruzioni PEEK devono essere 
modificate a 125 e 124 per le vec- 
chie ROM. L'istruzione POKE 2,3 
provvede al lincaggio per la funzio- 
ne USR. La riga 150 scrive tramite 
l'istruzione POKE il codice mac- 
china nel buffer per il secondo re- 
gistratore a cassette. La riga 30 
mette l’indirizzo di D% nel pro- 
gramma in linguaggio macchina e 
mette a zero D%. Le istruzioni 
DATA contengono il programma 
per le nuove ROM. Per adattare il 
programma alle ROM originali oc- 
corre cambiare i due 94 (alle righe 
500 e 720) in due 176: essi indicano 
la localizzazione dell’accumulatore 
in virgola mobile usato dall’istru- 
zione USR. 

Per far trasmettere il program- 
ma, POKE 1,91 per terminare il 
lincaggio della funzione USR, poi 
mandare un byte di preambolo 
(ancora %) per sincronizzare la 
trasmissione. Per mandare singoli 
byte (riga 200); POKE il carattere 
nella locazione 832 e poi eseguire 
un SYS826. Per trasmettere un nu- 
mero in virgola mobile (riga 220) 
passare il numero come argomento 
di USR; poiché USR deve essere 
posto uguale a qualcosa, può esse- 
re tranquillamente messo uguale 
alla variabile da trasmettere. 

Ovviamente se un programma 
viene fatto trasmettere, l’altro deve 
essere messo in condizioni di rice- 
vere: per prima cosa (riga 250) PO- 


REM 
REM 
REM 
REM D% DEVE ESSERE LA FRI 
D/=2S56%XFEEK (43) +FEEK (42) 

FOR I=826 TO 917: READ J 

I=SPEEK (D%): FOKEE 889,1: I 
REM ---TRASMETTE--- 

FOKE 1,91: REM LINK FER F 
FOKE 832,ASC( vi 


XXX XFROGRAMMA N, SXAX* 


REM TRASMETTE UN BYTE 
POKE 832,ASC("A"): 
REM TRASMETTE IL N. 


RICEVE--- 
POKE 1,13 REM LINE PER 
FOR I=1 TO 3: SYS 873: IF 


SYS 826: 
CA“) 


VERSIONE FER NUOVE ROM 
CON ROUTINE IN LINGUAGGIO MACCHINA 


MA VARIABILE 
FOKE a 
FOKE I 

=PEEK (D% 


NEXT 
1): FOKEE B9O,I: Du=O 
UNZIONE USR 
REM SINCRONIZZA 


FUNZIONE USR 


DX=ASC ("%") THEN 290 


NEXT: REM CERCA IL FREAMBOLO 


FRINT"SINCRONIZZAZIONE FALLITA": 


REM RICEVE UN BYTE 

SYS 873: A$=A$+CHR$ (DUY: 
REM RICEVE UN NUMERO 
X=USR (0): PRINTX 

REM DATA E CODICI MNEMONI 
REM 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 2 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 3 
DATA 
DATA 
DATA 
DATA 


169,255 
141,67,232 
169,0 
141,65,232 
173,76,232 
9,224 
141,76, 232 
41,31 
9,192 
141,76,232 
173, 77,232 
41,2 

240, 249 


TEYTE 


KE 1,139 per terminare il lincaggio 
di USR. Poi aspettate che arrivi il 
carattere di preambolo e cautelate- 
vi se non arriva (riga 280). Il ciclo 
FOR-NEXT a 260 e 270 non do- 
vrebbe mai andare oltre I=2. Per 


END 


FRINTA$ 


CI CORRISFONDENTI 


LDA 
STA 
LDA 
STA 
LDA 
ORA 
STA 
AND 
ORA 
STA 


AND 
BEO 
RTS 


sTA 


DEX 
BFL 
RTS 


STA 


AND 
BEO 
LDY 
STY 
LDA 
ORA 


0000 
$ERB4C 
#$E0 
$EB4C 
#61F 
#$00 
$E84C 
RTS 
LDX 


AND 
ORA 


#$05 

RBYTE 
$5E,X 
TEYTE 
RFLFI 


STY 
DEX 
BFL 


ricevere singoli byte chiamate 
SYS873 e ricavate il dato dalla va- 
riabile D%. Per ricevere numeri, 
(riga 310) la variabile che deve 
contenere il numero deve essere 
posta uguale a USR. L’argomento 


della funzione USR non ha impor- 
tanza in questo contesto. 

Nella maggior parte dei pro- 
grammi le righe da 180 a 190 e da 
240 a 280 dovrebbero esere scritte 
come subroutine, da richiamare 
per cambiare un modo di funziona- 
mento in un altro. Il maggior pro- 
blema con questo programma è 
che non può essere fermato facil- 
mente; la sincronizzazione, poi, 
deve essere perfetta, altrimenti 
uno dei due terminerà prima del- 
l’altro, lasciando il secondo blocca- 
to: uno o più SYS826 o SYS873 dal 
PET libero possono eventualmente 
sbloccare l’altro (il tipo di SYS usa- 
to dipende dal modo di funziona- 
mento del PET bloccato). 


Velocità di trasmissione 
La velocità di trasmissione è 
buona: con un ciclo 


FOR I=1 TO 2000: X=USR(1): 
NEXT 


si impiegano circa 8.6 secondi per 
trasmettere 2000 numeri in virgola 
mobile ossia con un ritmo di 1395 
byte/sec. Per trasferire i numeri in 
una matrice occorrono circa 12.5 
secondi. 

Per rilocare il programma, oc- 
corre cambiare i valori preceduti 
da uno zero nei DATA. Questi so- 
no coppie che formano indirizzi: 
prima il meno significativo, poi il 
più significativo secondo la formula 


BPS*256+BMS = IND. 


Devono essere cambiati insieme 
alle istruzioni POKE in Basic e ai 
valori del lincaggio della funzione 
USR. Per gli utenti del DOS ver- 
sione 4.0 si suggerisce di rilocare la 
routine per evitare che il sistema 
operativo usi il fondo del buffer 
della seconda cassetta. 
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PERSONAL SOFTWARE 


Pixelator, generatore 
di caratteri per il VIC 


La prima volta che capita di di- 
segnare caratteri speciali per il 
VIC-20 Commodore, la cosa può 
anche sembrare divertente. Si trat- 
ta di preparare la carta con una 
matrice otto per otto e disegnare il 
carattere. Poi occorre convertire la 
figura in numeri come se le caselle 
scure fossero degli uno binari e 
quelle illuminate degli zero. Fatto 
questo, bisogna memorizzare que- 
sti numeri. 

Poi, con un'istruzione POKE al- 
l'indirizzo 36869 la magia si com- 
pie. Lo schermo si riempie di strani 
segni. Ma, ecco! Al posto in cui 
dovrebbe esserci la A di READY 
c'è una nave spaziale, e al posto 
della D c’è un alieno con tre gam- 
be! 

Una volta che l’emozione è pas- 
sata, tutto questo lavoro diventa 
molto noioso. Già è abbastanza fa- 
stidioso convertire il disegno in nu- 
meri ma inserirsi nelle istruzioni 
DATA è ancora più tediante e, ol- 
tretutto, soggetto a errori di battu- 
ta. Basta sbagliare una battuta e la 
nostra meravigliosa astronave sem- 
bra passata per una barriera di rag- 
gi laser ed è ridotta ad un colabro- 
do. 


Progettare caratteri con Pixelator 


Il programma Pixelator rispar- 
mia un po’ della noia di questo la- 
voro e dà anche l’emozione di 
creare sempre nuovi caratteri. Pi- 
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xelator dà contemporaneamente 
sullo schermo quattro aree di lavo- 
ro di otto per otto punti per creare, 
editare e confrontare diversi carat- 
teri. Poi memorizza i caratteri così 
generati. Nel VIC standard con 3,5 
K di memoria, Pixelator riesce a 
far stare fino a 64 caratteri diversi. 
Se disponete di memoria ausiliaria, 
il programma può gestire fino a 
128 caratteri alla volta; esso può 
anche leggere i caratteri che sono 
contenuti nella memoria. Potete 
addirittura copiare i caratteri che 
sono già nelle ROM del VIC stes- 
so. In seguito potete modificare i 
caratteri a vostro piacimento. 

Come la maggior parte dei pic- 
coli computer, il VIC contiene la 
mappa dei caratteri in ROM (indi- 
rizzi da 32768 a 36863). Diversa- 
mente dagli altri, il VIC, però, ha 
caratteri formati in una matrice ot- 
to per otto anziché cinque per set- 
te. I punti che formano il carattere 
si chiamano pixel e sono i pezzi più 
piccoli dello schermo che possono 
essere controllati individualmente. 
Questo fatto rende i caratteri del 
VIC un po’ strani da vedere (sono 
più larghi che alti), ma sfrutta com- 
pletamente le possibilità della me- 
moria. Per ogni carattere occorro- 
no otto byte, e ogni byte corrispon- 
de a una riga orizzontale del carat- 
tere. L'informazione verticale si ha 
dalla divisione del byte in zero e 
uno binari che corrispondono alle 
aree scure e luminose del caratte- 
re. 


La memoria 


Cambiando, con POKE, il nu- 
mero contenuto all’indirizzo 36869, 
viene alterato il punto della memo- 
ria dove il Video Interface Chip 
(circuito integrato che controlla e 
gestisce il video del VIC e da cui 
proviene il nome stesso della mac- 
china) cerca la mappa dei caratteri. 
Questo avviene automaticamente, 
per esempio, quando passate dal 
modo grafico al modo testo dalla 
tastiera. Il modo grafico corrispon- 
de al valore 240 all'indirizzo citato 
prima, mentre il modo testo corri- 
sponde al 242. Il valore intermedio 
241, rappresenta i caratteri grafici 
inversi, ma quando si usano i carat- 
teri grafici inversi da tastiera, il va- 
lore a 36869 non cambia. 

Un valore di 252 sposta la map- 
pa a 4096, ossia l’inizio della RAM 
standard da 3,5 K byte. Oltre il 
252, l’indirizzo corrispondente vie- 
ne incrementato di 1024 byte, fino 
a un massimo di 7168 che corri- 
sponde al valore 255. A causa della 
lunghezza del programma, Pixela- 
tor usa il valore più alto, ossia 255. 

Pixelator, una volta caricato e 
funzionante, occupa circa 3 K di 
memoria. Su VIC non espanso, re- 
stano liberi circa 500 byte che per- 
mettono di memorizzare 64 carat- 
teri. Questo limite coincide con il 
fatto che la memoria sopra 7168 è 
occupata dalla mappa dello scher- 
mo. 

Naturalmente, con la memoria 


az Dili Licsiciicitcititiciciti i iiicoiiitti titti 
REM 
FEM 
REM 
REM 
REM * 
PSE 06266066666 66 06 0A REA AA RAR AAA 

uM=f 169: PESO! CL=38400 

POKESI, 240: POKESZ, XK/256-1:POKESS, 240 

POKESE, 4K/256-1 

FORL&=16T01STEP-1:READXZ:POKEXK-LM, &Z:NEKT 

POKERA-10, 502256: FPOKEMK-1,#4/256-1 

PRINT"IIMM"; 


PIMELATOR 
VERSIONE YIC-20 
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FORZ=1TOS:PRINT"M"î9 ei 
PRINT" 777-727 'NERT 
fi POKES6S79, 25:F=0d: J3A:SYSMR-1E 
162 PRINT'SBieF 1MS-CREA CARATTERI" 
110 PRINT"hGF325- LEGGE MEMORIA" 
120 GETS1#:IFS1#=""THEN120 
130 IFS1*="i"THEMK=B:FOKE36879,29:GOTO1eA 
fi IFS1s="S"THEHPOKE36879, 27: GOTOSSGA 
do GOTOL=a 
(a 1THEH19A 
-16:PRINT"SSCEGLI"SPC(45"F1 Fa" 
CHERMO : "SPCc2)"FS Fr"; 
=""THEM186 
THENSIGG 


Sl" :NENT 


00 10 TU I PAOLINE 


TITOLO MNOA I 


A 
HH=1:F=86: GOTO2SO 
HH=11:F=199:GOT025O 
404=13:HH=1:F=462: GOTO25A 
:HH=11:F=4£ 


di IFISOTHENC=C.I:CA=CG:GOT0320 
-16:PRINT"SSCEGLI IL CARATTERE"; 
C&:IFC#=""THENZ9O 
300 GOSURSAAO 
: IFCE=ZANDS2#="" THENZSA 

(= 1ANDI=MANICEC31THEM4GGG 
IFCESATHEH2IA 


34 C C:POKEF+CL,@: N21 Hai 

342 ##22+H:PA=P :PA=PEEKC(P3+72:PP=PA 

350 I= SMM-16:PRINT"SF1-MEMORIZZA" 

360 PRINT"F3-CAMCELLA FS-RILOCA FF-MEMORIZZA/INCR":; 
370 GETG$ :POKEP,PO:POKEPA, PP: IFG&=""THENS7A 


IFASC(6%)=160THEHPGKEP, ASCC08) :H=H+1:G0T0440 
IF G#2=S2THENPOKEP, ASC(G$):H=H+1:GOT044@ 


290 IFGS="N"THENV=N+1:GOT0440 

400 1FG&=""1"THEHNY=V-1:G0T0440 

416 IFG$="hl"THEHH=H+1:G0T0440 

429 IFG&="HI"THENH=H-1:GOT044A 

430 IFASC£G83<1330RASC(68)2136THENS70 
440 IFH3STHEMH=1:N=V+1 


espansa, tutto quello che dovete 
fare è scegliere una zona di memo- 
ria che non interferisca con la map- 
pa dello schermo. Certe volte il 
problema viene risolto automatica- 
mente, poiché la mappa del video 
viene spostata (così come la mappa 
del colore dei caratteri). 

Le tre variabili in 20 vi permet- 
tono di cambiare il programma per 
compensare queste differenze. XX 
è la memoria per la mappa e deve 
sempre essere un multiplo intero di 
1024. SC è la memoria per lo 
schermo e CL quella per il colore. 

Quando fate girare il program- 
ma, per prima cosa vi viene propo- 
sta una scelta tra creare nuovi ca- 
ratteri o leggerne di residenti in 
memoria. La scelta è codificata se- 
condo il colore: verde o ciano ri- 
spettivamente. Se scegliete di crea- 
re caratteri, con il tasto F1, il bor- 
do dello schermo cambia da bianco 
a verde e potete scegliere una delle 
quattro aree di lavoro con i tasti 
F1, F3, F5 e F7. Poi vi viene chie- 
sto il carattere al cui indirizzo vole- 
te memorizzare il nuovo carattere. 


Quattro opzioni 


Una volta scelto il carattere, ve- 
drete comparire un simbolo alto 
metà carattere all’angolo sinistro 
dell’area di lavoro scelta. Quello è 
il vostro cursore e voi, usando i ta- 
sti di controllo del cursore della ta- 
stiera, potete posizionarlo dove vo- 
lete. Per disegnare un carattere 
usate la barra dello spazio. Con 
SHIFT e spazio lascerete una scia 
rossa. Senza lo SHIFT premuto, 
verrà cancellato quello che sta sot- 
to al cursore. Per cancellare un’a- 
rea di lavoro, basta che teniate 
premuto lo spazio finché tutto il 
rosso non sarà sparito. 

Dopo aver elaborato il carattere 
a vostro piacimento, avete quattro 
possibilità. Fl memorizza gli otto 
byte nell’area di memoria appro- 
priata e torna al formato di apertu- 
ra. F3 abortisce il disegno che ave- 
te generato e torna all'apertura 
senza memorizzare il carattere. FS, 
invece, cambia nome al carattere, 
permettendovi di assegnargli un in- 
dirizzo diverso da quello scelto 
precedentemente. Questo n. uo è 
più utile quando state leggendo i 
caratteri dalla memoria, piuttosto 


79 


459 IFH£1THENH=8 :4=V-1 
460 IFV>8THEHN=1:H=H+1 
47 IFV<1THENY=8:H=H-1 


che quando li create, ma funziona 
in tutti e due i modi. F7, per finire, 
memorizza il carattere e passa a 


; 5 Ilo successivo, senza costringer- 
489 PP=PEEKCP) :PA=P:IFPP=1940RPP=232THEMPP=PP-72 que i 8 
490 IFGS="" THENK=B:POKEPA, PP: GOTO1000 delay oh n rn pio 
560 IFG$="E"THENK=D:POKEPA, PP:GOTO100 Ca lui de 
510 IFG$="ll"THENI=1 :POKEPA,PP:GOTO5208 gra na 
520 IFG$="NI"THENJ=1:POKEPA.PP:GNTOLAGA quenze di caratteri. La procedura 
530 P=SC+(1/!4+4)&22+HH+H:PA=PEEK(P)+72 si ripete finché non si incontra il 
548 GOTDS7A punto di domanda, che è l’ultimo 
1000 SWSKM-16:PRINT"8MEMORIZZO "; :POKESC+1@,C dei 64 caratteri, dopo di che torna 
1016 FORVE=1TO8:ZZ=0 al formato di apertura. 
1620 FORHY=1T08:PO=SC+CYN+VE )22+HH+HY Se, alla richiesta del formato di 
1039 IFPEEK(POI=1680THENZZ=ZZ+21(8-HY) apertura, viene scelto il modo che 
1640 NEXT legge i caratteri dalla memoria, il 
1050 POKEXX+C&S+V/E-1,ZZ:MEKT:IFJ=QTHEHIGG bordo diventa color ciano e vengo- 
ana CI=C+1:CG=C0+1:St=CHR£(ASCCSEI+11 no proposte cinque alternative. F1 
2002 IFASC(S$5>135THENS$="E" legge da RAM; esso legge sia ca- 
20168 IFC.I=64ANDXK=716SANDSC=?7ES6THEMCE=2 ratteri che avete già inserito in me- 
2020 IFK=2THEHK=1 moria sia i byte casuali presenti in 
2030 IFCG»127THENCG=M memoria se non avete inserito nes- 
2040 1FS26=""ANDCE=2THENJ=0:GOTO10G ilo 
565 pani .P=9 5 eggere la memoria. egge i ca- 
A aa lieti ratteri dalle ROM del VIC nel mo- 
3500 ira do grafico, mentre F4 carica i ca- 
2510 SYSXK-16:PRINTSFI-CARICA_DA_RAM" Sari lano pe orata 
3520 PRINT'F2-ROMORAF  8FA4-REVERSE"; pesci li pa Sol gia 
SERA, Sa e ra È Sa i caratteri in re ri- 
3522 PRINT"BFE-ROMTESTO 8FS-REVERSER"; i , 
3598 GETS24: dai AA FIERO soriannte del modo testo. Po- 
23546 IFS2 =" THENYR=%%: GOTOSSSA tete mMEesco: are 1 eramente 1 carat- 
= Ja asti UTISS teri prelevati con qualsiasi delle 
3350 | ale cinque possibili scelte e modifica- 
3552 IFS2>-1ANDS2C4THENKF=32768+19244S2:GOT02578 zioni secondo i nostri bisogni. Se 
2968 GOTOSSZA per esempio vi serve l’intero alfa- 
2570 9 242: GOTOIEA beto assieme ai vostri caratteri spe- 
3560 di: GOTDLEA ciali, esiste una scorciatoia che 
daga i consiste nel memorizzare i caratteri 
dala SYS a 7168. Con POKE, in seguito, in- 
4012 PRINT"&" :PRINT'ECCO LA ";S5$:POKE7719,C0 serite 255 alla locazione 36869 e ot- 
4020 FORD=1T08:NA=PEEKCXR+C0#8+D-1):DI=@ terrete l’effetto di avere i caratteri 
4830 FORDD=1T08:DI=INTC0A/218-D05) nompali, da Gu 7, cen il tato 
4032 DA=DF-DI#21(8-DI) sb iaa e Mr speciali 
AG; 3 i con il tasto - Questa pro- 
ved Lied ieri cedura funziona solo con il valore 
Sa DO=32 
4060 IFIOI=SAHDICSTHENZDI=15: GOTCAASE Li questo punto il programma 
pit “Alamanni chiede quale area di lavoro deve 
4036 ZF=SC+(W4+I1)#22+HH+DD:POKEZF, DO ud rn Ea, 
4092 POKEZF+ZD1, PEEK(2F+2015+72:HEXTDI.Il fico (oppure, nel modo testo, un 
4100 IFCEDATHEHK=2:G0T04120 


carattere maiuscolo) dalla ROM, 
dovrete cambiargli nome con un 
carattere che sia inferiore a 64. Le 
scelte a vostra disposizione, a que- 
sto punto, sono le stesse viste pri- 
ma: memorizzare, abortire, cam- 
biare nome o memorizzare e incre- 
mentare il carattere. Se avete cam- 
biato nome a un carattere, sia il ca- 
rattere originale che il nuovo nome 
vengono incrementati dal tasto F7. 


STSHX-16:PRINT"SRILOCA" :GOTN29 


RETURN 
OMASC‘S$3-132G0T021 


PP DRD 
PAPA 


nnnnqnianin 
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1 REM PISAYER 
CFPEEKCS6I+11&256 


IFXX=716SANIC>6&3ANDSC=7680THENCE=2 : RETURN 


16&:PRINT"MPRIMO CARATTERE?" 


=" "THEHSO1A 


Listato 2. Pixaver 


Salvate i vostri caratteri 


Più che per il piacere di inventa- 
re, probabilmente vorrete creare i 
caratteri per usarli in qualche pro- 
gramma particolare, per esempio 
in qualche gioco sullo schermo. I 
tre programmi più piccoli che ap- 
paiono in questo articolo vi per- 
mettono di salvare i caratteri che 
avete creato con Pixelator. Per me- 
morizzare i caratteri direttamente 


LUO DA "SRE" AO"LS 


f@:SR=C: IFCE@THENSG1A 
15)" "SR$; 


=SR$:5Rs=|S#:!|5$=55£ 


CZ&G+LL3 


STHEMCE=® 


su cassetta, dovete fermare il pro- 
gramma con il tasto STOP e batte- 
re NEW per cancellare il program- 
ma dalla memoria. 

Poi caricate il programma Pixa- 
ver. Esso vi permette di salvare su 
nastro un blocco di caratteri di 
qualsiasi lunghezza, fino a 64, in 
un solo file sequenziale di dati. Il 
primo dato del file rappresenta il 
codice usato dallo schermo per il 
primo carattere del blocco, mentre 


il secondo dato è il codice dell’ulti- 
mo carattere. Questo vi permette 
di salvare quanti blocchi volete; 
ogni file contiene le informazioni 
necessarie per memorizzare i dati 
al posto giusto. Ogni file, inoltre, 
ha il primo carattere del blocco co- 
me nome di riconoscimento. A 
questo punto potete anche spegne- 
re il VIC. 

Pixeloader, invece, legge i dati 
dal nastro in memoria. Notate che 
la riga 10 del programma stabilisce 
il valore di XX indirizzo di parten- 
za della mappa di memoria. Cam- 
biando questo valore è possibile 
memorizzare vari blocchi in diverse 
zone di memoria, aggirando in 
questo modo il limite di 64 caratte- 
ri che abbiamo incontrato con Pi- 
xelator. Assicuratevi che XX sia un 
multiplo intero di 1024, altrimenti i 
caratteri non corrisponderanno più 
ai caratteri della tastiera. 

Il terzo programma accessorio si 
chiama Pixdata. Esso converte un 
blocco di caratteri in RAM in istru- 
zioni DATA, una per ogni caratte- 
re. I numeri di riga delle istruzioni 
DATA corrispondono al codice del 
carattere sommato a 5000. Le 
istruzioni DATA sono un modo 
molto inefficente di usare la me- 
moria, ma sono più convenienti 
della registrazione su nastro perché 
possono essere inserite all’interno 
di un programma risparmiando le 
operazioni necessarie per leggere i 
caratteri dalla cassetta. Pixdata 
non è stato progettato per essere 
orientato all’utilizzatore come gli 
altri programma visti, perché è sta- 
to ridotto all’osso. Probabilmente 
dovrete modificare alcune righe del 
programma per adattarlo alle vo- 
stre esigenze ogni volta che utiliz- 
zerete il programma. I valori di SR 
e LS, inizializzati nella riga 30, per 
esempio, rappresentano i codici del 
primo e dell’ultimo carattere, ri- 
spettivamente. Se avete solo 3,5 K 
di memoria, non è possibile creare 
più di 30 caratteri alla volta senza 
incorrere in un OUT OF MEMO- 
RY ERROR. 

Quello che rende Pixdata inte- 
ressante è il fatto che si autodi- 
strugge dopo aver terminato il suo 
compito, risparmiandovi di cancel- 
larlo riga per riga per fare posto al 
vostro programma. (Ricordatevi di 
farne una copia su nastro prima di 
farlo girare!) 


si 


1 REM PIELOADER 
10 HA=7162 
OPENID. 1.6 
INPUT#1.SF 


Jim n 
DOD DID 


INPUT#1.LS 


INPUTA! +C:POKESK+5#6+RR,C:MEATRR:MERTS 


Listato 3. Pixeloader 


Il segreto di Pixdata sta nel mo- 
do in cui il VIC memorizza le righe 
di pregramma Basic. I primi due 
byte di ogni riga sono il numero di 
riga della prossima istruzione. Il 
terzo e il quarto byte sono il nume- 
ro di riga dell’istruzione. Dopo 
questi quattro byte ci sono dei dati 
che possono rappresentare o co- 
mandi Basic abbreviati (in inglese 
token), o caratteri ASCII. Tutti i 


1 REM RIGA DA CAI 
REM DEVE UG 


numeri sono trattati come stringhe 
ASCII, perciò un’istruzione DA- 
TA necessita di tre byte per ogni 
singolo valore. Il numero 128, per 
esempio, diventa 49, 50, 56. 

Aggiungete un 44 per ogni virgo- 
la e capirete perché una istruzione 
DATA usa fino a quattro volte più 
memoria del numero che rappre- 
senta. 

Pixdata comincia a creare le 


LUARE DOPO AVER TERMINATO 


1 SALVARE SU MASTRO PRIMA DI ESEGUIRE 


[=] 


120: AA=ZE 
EZZ- 1.0 
FORL=SRTOLS 

F@ L2=INT(L#16+5000 


72 POKEZZ 
SG FOKE 


EZZ+A. O 


#256 


OFE4B9I7.AL 


KESZ. 20: POKESS, G:FOKESE, ZA 


+4, d4:MEKT 


OFE4ASS. A2:POEEGS.( 


Listato 4. Pixdata 
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DATA dalla riga 5120, valore in 
ZZ. nella riga 40. La riga 10 pone 
anch’essa a 5120 il limite massimo 
per la memoria dedicata alle righe 
Basic, proteggendo così le istruzio- 
ni DATA create dallo stesso pro- 
gramma. Quando il programma ha 
terminato di generare le DATA, 
esegue un POKE del valore di ZZ 
nei primi due byte della riga 1, che 
contiene “REM RIGA DA CAN- 
CELLARE DOPO AVER 
TERMINATO”; in questo modo 
l’interprete Basic salta direttamen- 
te dalla riga 1 alla 120, prima riga 
delle istruzioni DATA e in questo 
processo distrugge Pixdata. Quan- 
do poi voi cancellate la riga 1 scri- 
vendo 1 su una riga libera dello 
schermo e poi battendo RETURN, 
l'interprete compatta le righe con 
le DATA all’inizio della memoria. 
Se avete aggiunto RAM al vostro 
VIC, assicuratevi che i due indiriz- 
zi nella riga 170 corrispondano pri- 
ma di far girare il programma. 


Per utilizzare le istruzioni DA- 
TA in un programma, avrete biso- 
gno di una riga come: 


FOR L=SR TO LS: FOR M=0 
TO 7: READ C: POKE Xx+ 
L*8+M,C: NEXT M: NEXT L 


Il valore di XX (mappa di me- 
moria), di SR (primo carattere) e 
di LS (ultimo carattere) devono es- 
sere gli stessi usati in Pixdata. 


I listati di questi quattro pro- 
grammi sono stati redatti con delle 
norme diverse da quelle solitamen- 
te usate per gli altri listati della ri- 
vista. Questo è stato fatto per per- 
mettere anche a chi non possiede 
l'espansione di memoria per il VIC 
di far uso dei programmi. I caratte- 
ri speciali che appaiono nei listati 
sono quelli corrispondenti ai carat- 
teri che il VIC stampa sul video. 
La stampa è stata effettuata con la 
stampante originale del VIC. Ci 
scusiamo perciò per la qualità della 
stampa e per la scarsa leggibilità 
dovuta alla mancanza di spazi tra 
le istruzioni, ma lo scopo vale la 
pena. I listati vanno battuti come 
sono, saltando le istruzioni REM. 
Questo discorso non vale, invece, 
per il quarto programma, Pixdata, 
che deve essere battuto così com’è, 
compresi i REM. 


La carta del cielo 


Computer: Apple Il 
Modello: Europlus 


Configurazione: 48 K 


Un oroscopo è una mappa del cielo nel momen- 
to della nascita di un individuo. Esso illustra le po- 
sizioni dei corpi celesti in relazione alle dodici case 
e ai dodici segni attraverso i quali passano. Queste 
posizioni nel momento della nascita si pensa siano 
di grande importanza nella vita dei singoli indivi- 
dui. La mappa celeste di queste posizioni costitui- 
sce l'oroscopo di quella persona e viene detta “la 
carta del cielo”. 

Questo programma calcola e visualizza la 
“carta”. Usando il sistema Koch di suddivisione 
delle case, il programma produce la carta del cielo 
per ogni data che scegliete. Ciò vi farà risparmiare 
tempo ed energia eliminando il laborioso proces- 
so di creazione della carta. L'interpretazione degli 
aspetti a questo punto è lasciata a voi. 


Uso 


Per usare il programma dovete introdurre i dati 
standard di nascita usati dagli astrologi. Dapprima 
battete T o S, secondo che desiderate un oroscopo 
normale (T per tropicale) o corretto del movimen- 
to di precessione degli equinozi (S per siderale). Il 
programma quindi vi chiede la data di nascita, l'o- 
ra, il fuso orario, la longitudine e la latitudine. Una 
volta introdotti questi dati, viene tracciata la 
“carta” sullo schermo e vengono visualizzati gli 
“aspetti” (cioè le relazioni angolari di un pianeta 
con gli altri) dei corpi celesti. Ciò risparmia agli 
astrologi il pesante lavoro di ricavare gli aspetti da 
tavole di riferimento per tracciare la “carta” di una 
certa nascita. 

Per introdurre i dati, usare il seguente formato: 


Data: GG/MM/AAAA -return- 

Il giorno, il mese e l’anno di nascita. Il giorno è 
un numero da 01 a 31, il mese è un numero da 01 
a 12 e l'anno può andare da 1900 a 2000. Le sbarre 
(/) servono per separare giorno, mese e anno. 


Autore: Peter Dennings 
Versione italiana: Mauro Boscarol 


Note: Disponibile su dischetto 


| giorni e i mesi di una sola cifra devono avere lo 
zero (0) davanti. 
AM o PM -return- 

AM significa che la nascita è avvenuta tra mez- 
zanotte e mezzogiorno, PM tra mezzogiorno e 
mezzanotte. 

Ora: HH.MM -return- 

L'ora si introduce in ore e minuti. HH può anda- 
re da 00 a 11, dove 00 è uguale a 12 (12 e 03 deve 
essere battuto come 00.03) e MM può andare da 
00 a 59. Ore e minuti sono separati da un punto. 
Se nel giorno di nascita era in vigore l'ora legale, 
bisogna sottrarre un'ora (vedi tabella). 

Fuso orario: H -return- 

Il fuso orario indica il numero di ore dal tempo 
medio di Greenwich dove H è uguale a zero. 

Per zone a est di Greenwich usare il segno meno 
(-) prima del numero di ore. Per esempio, l’Italia è 
1 ora a est di Greenwich e deve essere indicata 
con -1. 

Longitudine: GG.MM -return- 

La longitudine è introdotta nel formato GG.MM 
dove GG sono i gradi e MM i minuti. Le longitudini 
ovest sono rappresentate da un numero positivo, 
quelle a est da un numero negativo. Per esempio 
la longitudine 76 gradi e 18 minuti ovest deve es- 
sere battuta 76.18. Tutte le località italiane hanno 
longitudine negativa. 

Latitudine: GG.MM -return- 

Per la latitudine si usa lo stesso formato della 
longitudine. 

Le latitudini nord (sopra l’equatore) sono rap- 
presentate da numeri positivi, le latitudini sud da 
numeri negativi. Tutte le località italiane hanno la- 
titudine positiva. Si veda la tabella delle coordina- 
te geografiche delle principali città italiane. 


Questo programma non riconosce gli errori, 
quindi prima di premere RETURN assicuratevi di 
aver impostato dei dati corretti. 

Dopo aver introdotto tutti i dati, il programma 
produce la “carta” di quella nascita. Per vedere gli 
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aspetti planetari battete A e le relazioni verranno In figura 1 è riprodotta una “carta” in bianco che 

visualizzate al centro dello schermo. potete ricopiare per annotare le posizioni dei pia- 
Per introdurre nuovi dati e produrre una nuova | neti e i risultati del programma. 

carta battete N e procedete come descritto sopra. 


ORE LEGALI IN ITALIA 


(ore 24) 
(ore 24) 30/9 (ore 24) (ore 24) 
(ore 24) 30/9 (ore 24) (ore 24) 
(ore 24) 6/10 (ore 24) (ore 24) 
(ore 24) 4/10 (ore 24) (ore 
(ore 24) 18/9 (ore 24) (ore 
(ore 
(ore 24) 31/12 (ore 24) (ore 
(ore 31/12 (ore 24) (ore 
(ore 2/11 (ore 3) (ore 
(ore 4/10 (ore 3) 
(ore 2/10 (ore 3) 
(ore 2) 16/9 (ore 24) 
(ore 6/10 (ore 3) 3 legali) 
(ore 5/10 (ore 1) 3 legali) 
(ore 3/10 (ore 3) 3 legali) 
ITALIA ITALIA | 
Località Long. Lat. Località Long. Lat. 
Agrigento —13.55 37.18 Firenze —11.16 43.46 
Alessandria —8.38 44.54 Fiume —14.27 45.20 
Ancona —13.31 43.37 Foggia —15.34 41.28 
Aosta —7.20 45.44 Forlì —12.02 44.13 
Aquila (L') —13.24 42.34 Frosinone —13.22 41.30 
Arezzo —11.53 43.28 Genova —8.55 44.25 
Ascoli Piceno —13.36 42.52 Gorizia —13.37 45.57 
Assisi —12.38 43.05 Grosseto —11.07 42.46 
Asti —8.12 44.54 Iglesias —9.32 39.18 
Avellino —14.48 40.54 Imperia —8.02 43.54 
Bari —16.53 41.07 La Spezia —-9.49 44.06 
Belluno —12.19 46.08 Lecce —18.10 40.21 
Benevento —14.48 41.07 Lipari —14.57 38.28 
Bergamo —-9.39 45.42 Livorno —10.19 43.33 
Bologna —11.20 44.30 Lodi —9.30 45.18 
Bolzano —11.20 46.30 Lucca —10.30 45.50 
Brescia —-10.12 45.32 Mantova —10.47 45.09 
Brindisi —17.56 40.39 Marsala —12.26 37.48 
Cagliari —9.06 39.13 Matera —16.37 40.41 
Caltanissetta —14.04 37.29 Merano —11.10 46.41 
Campobasso —14.40 41.34 Messina —15.33 38.11 
Capri —14.15 40.32 Milano =9:12 45.28 
Carrara —10.06 44.05 Modena —-10.56 44.38 
Caserta —13.50 41.30 Monza —9.15 45.35 
Catania —15.05 37.30 Napoli —14.16 40.52 
Catanzaro —16.35 38.54 Novara —8.36 45.27 
Chieti —14.11 42.21 Nuoro —9.20 40.20 
Civitavecchia —11.47 42.05 Padova —11.52 46.23 
Como —9.05 45.49 Palermo —13.22 38.07 
Cosenza —16.15 39.17 Parma —10.10 44.48 
Cremona —-9.01 45.05 Pavia —-9.09 45.11 
Crotone —17.08 39.05 Perugia —12.23 43.07 
Cuneo —7.33 44.23 Pesaro —12.55 43.55 
Enna — 14.17 37.33 Pescara —14.13 42.28 
Faenza —11.53 44.17 Piacenza —9.42 45.03 
Ferrara —11.38 44.50 


continua nella prossima pagina 


ITALIA ITALIA 


Località Long. Località Long. 


Pisa —10.24 Taranto —17.15 
Pistoia —10.55 Teramo —13.43 
Pola —13.51 Terni —12.39 
Potenza —15.49 Tivoli —12.48 
Rapallo -9.14 Torino —7.42 
Ravenna —12.12 Trapani —12.32 
Reggio Calabria —15.39 Trento —11.08 
Reggio Emilia —10.38 Treviso —12.15 
Rimini —12.35 Trieste —13.46 
Roma —12.29 Udine —13.14 
Salerno —14.46 Urbino —12.38 
Sanremo 7.47 Varese —8.49 
Sassari —8.33 Venezia —12.20 
Savona —8.29 Verona —11.32 
Sestri Levante -9.23 Vicenza —11.32 
Siena —11.18 Viterbo —12.07 
Siracusa —15.17 Voghera —-9.01 
Sorrento —14.23 


1 REM POPAOPASSPPPONIOSO!UOPPIUSOSPOSPPOGOODOOIOE 120 DEF FN Q0%0) = SEN © x C INT < ABS ® 
2 REM * X)) +* € ABS (X} - INTO‘ ABS xii * ib 
3 REM * ASTROLOGIA Li 9 / 60):V$ = “"SEUOUONO" 

4 REM * * 125 DEF FN UCXx) X = ( INT (X ‘ MO) £ MO) 
5 REM * VERSIONE AFFIE IT * » DEF O FN Wex) = INT ‘4% % 100 + .00 # 
6 REM X * 100: DEF FN RX) = “ * FI 180 

7 REM * PERSONAL SOFTWARE + | 1300 DEF FN YOO = ATN ( SOR «i x 

8 REM X * x) 

9 REM IHUUIIOSSUOSONOSONSSINORPIOROVORUOOAPODOIOOE RE ri ; 6 

10 DATA AR,SO,TO,ME,GE LE,GI.VE, 136 VTABR (8): 


SA,BI,UR,SC,NEySA,FL, O, NO 


SI = NORMAL "Ri 
15 DATA 1,13,1,19,11,19 31,19 OFICALE ": PRINT" MOFMAI 
La tb, Lig babi? : PRINT “IDERA GOSUE SONA: = 0g IF 
zo n), OFFO718C G$ = “ THEN SD = 1 
2 0 QUORNAS, 138 HOME 
22 QUIOPISO 140 DEF FN xXx) ( # SURI = 
30. DATA 358.47584, wi:mo 1 TO 12: FFAD 78‘ 
1,-.41E-4,0,1,00 1) LC$(1 
32 DATA 1.71918 145 FOR I = EDE do = 1 TO Di BFAD E 
8,149472.515,0,.2 KI dI NEXT fr FOR TI = 1 IN fis FPRFAD 
DATA . 387098, 28.7 ABITI): 
4594,1.195 9,.00186 147 VTAR 8 
36 DATA - +8039,.00129, 150 PRINT TARC 10) pr TMP "DATA (GG MM Aa 
- 00682, - 3A$:D = VAL OC MID$ (48,123) 


38 DATA 54, OR19,-.0 455 Y=0 VAL OC MIDA CAST. .M Ml MID 

9985,. 367,001 (6%8,4,2))s PRINT TAB? 1003: INPUT "AM 
40 F 

160 PRINT 010) gr VINBUTO "ES (HH, Mi" 
42 :FO PRINT TARC im IMPIT "FISSO 
1x0 F EM DIF) + Y 
si 165 1‘ SL ONGITUDIME (66 
MM) LOS = FMONESO » IF F 

46 % M“ THEN F = F + 17 

TE. A6622, 1700 PRINTO TABS 10) gr IMPLOO "IG TIENE Sia 
48 DATA MM)=":B4:B04 -— B4A:B4 > EM OK Q(BIDI 

1.08522,. 1% 
SO DATA -. 171 LA 

4882, 428, 37911,.8E-4,.046344 172 FOR ZO = & TO HTAH (im UTar 5)» 
5s2 3E-4,0,19.71814,98.07155,. 98577,- PRINT" “si NEVT 


-00107,73,4771 

54 DATA .77246 
134,-.7E-4, 

S6 DATA 04597, T2564,.00014,13 
0.68136,1.09894,,000249, 1. 77924 

954,0, 279.947 144.913 

39.51774,113 159,0,0 

1031, 17. 14678,0 


997,00 174 VTAB (8): PRINT 
aMi/"ovi 


TAB 13) 


#0) DATA TORCISRA4, Lea, 0 175 * (Y + 4800) + M PMR go 
so INTO CIM / 12) % 12) + 7 + 365 % IM 
1150 DEF FN SO0 = SIN (X * FI / 180): DEF alt: 
FN Dex) si XX 180 / FI:ST$ = "SNMONNOOO adi ra na dr 
116 IONE IE 14159065 1: 2 = DI991%1 THEM 198% 
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1783 = J + INT (IM 7 4800) — INT (IM / 12 
00) + 38 
180 T = ((J — 2415020) + F_/ 24 — .5) / 
S 
182 C(11) = FN UC((9ZZ060 — 6962911 X T + 7. 
SX T % T) / 3600): IF SD = 1 THEN GOSUE 
700 
185 RA = FN RC FN U((6, 5460655565 + 2400, 051 
262 & T + 2.59056E - S5&KT&T + F) K& 15 
- L5)) 
195 OB = FN R(Z3.45229444 — .0130125 * T) 
200 MC = ATN € TAN (RA) / COS (OB)): IF MC 
< O THEN MC = MC + PI 
SIN (RA) O THEN MC = MO + FI 
FN D(MC) 
207 X = FN DCRA) / 15:Y = INT OO:Z = ( — 
VW * 60:X = INT ((Z —- INT (2)) X 60): 
2 = INT <Z) 
210 PRINT TAB 10);" STR (MH) + "H 
“ # STR6 CZ) +" + STR$ (X) + "S": GOSUR 
92000 
211 GOSUB 430 
212 NORMAL 
220 FOR I = 1 TO F:MO = 2 %& FI: GOSUR 3O5:M 
= FN U(8): GOSUB 395:E =  FN D(S):EA = 
M: FORA = 1 T05 
225 EA = M + E % SIN (EA): NEXT A: READ AU: 
X = AU * € COS (EA) — E):Y = AU * SIN 
(EA) * SOR (1 - E X E) 
GOSUB 410: GOSUB = A+ S: BOSUB 4 
00:D = X:X = Y:y GOSUB 410: GOSUR 
95: AN 
235 GOSUB 4005ZZ = Y:Yy 
:5 = A+ GN: IFA 
240 Yi GOSUR 
245 = FN DC FNM UCk 
= YYaZi = Z7:X 
250 WI CUR .5 + Mi 25) * (Mi 25% F 
È 1.5)) -— COS 
YY = VV -— YViszz = Z2 - Zi: GOSUR 
IF WI “ 0 THEM v = Y 
= FNU(C + SD) + Y: NENTI 


MiMl = 


b&9 19 
280 "6 È SN 
n PA 
295 1% % FM 
- 1465 
290 - 165 £ FM - % è 14 
Liv = dî * JFN SIL è LA) 
SI FMI mM 
EMO Loi + SD) 
FM LC (11) + SDIG:OROTO 
vWi GOSUB 4io:k = £ 

(60: RETUEN 

316 25 = INT e20 TMT za + Sb: è Jedi © 
INTO £ FM uii?o. dI) INT ‘2% MI + 

SIX) 
315 X% = STR («271 meet 15 PHEMN va = "G 

"e RIGHTS (8,10 

FIGHTI IR # Et ‘ yv $* » 

O €50) 

Il 260. (77%) fu THEN *?% uo 6 

(226,1) 
T30 2% = RIGHTS (X&,0) + FEUDO d 77%: RESURN 


x9s 


57 = FM RIS + SI #1 
TURN 

400 A = 0 THEM A - 

405 X * cos tv F_# 
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FE PI 


410 IF Y= 0 THENY = 1.75E - ? 
415 R= (XKX+ Ya&W «536 ATM iV/X 
): IFA<0 THEN A = 4 + 
420 IF Y< 0 THENA= A + FI 
425. RETURN 7 
430 VTAB 1: FOR I = 1 TO S: NORMAL 
435 PRINT K$;: INVERSE : PRINT MID® (H$(11 
) ,I,1);: NORMAL : PRINT k&g: INVERSE e: PRINT 
MID$ (H$(10),1,1) MORMAL : PRINT ES; 
440 INVERSE : PRINT MID$ (H$(9) 1,1): NEXT 
1: PRINT " “H$(12)" " MID$ (H$(11),6); 
445 PRINT K$ MID$ (H$(10),6,1)K$ MID& (H$(9 
),6,1)"  “"Hs(g)"o" 
446 INVERSE 
450. FOR I = 1 TO S: HTAB 10: PRINT " ":: HT6E 
30: PRINT " 
455 PRINT " “H$(1)" DÌ 
"Hg (7) "o" 
460 FORI= 1 TO HTAB (10): FRINT " 
ZO: PRINT " NEXT T 
465 PRINT " “H$(2)" " MID$ (H$(3) 1,1)" CA 
SE DI " MID$ (H$(4) 1,1); 
470. FRINT " PLACIDUS" MID$ (H$ (5) 1,1) "H 
$(6)" ": FOR I = 1 TO S: NORMAL : PRINT 
K$r 
475 INVERSE : PRINT MID$ (H$(3),I + 1,1)3r 
NORMAL : PRINT F$;: INVERSE ©* PRINT MID$ 
(H$ (4) I + 1,1);: NORMAL : PRINT K$; 
480 INVERSE : FRINT O MID$ (H$(5),I + 1,1): NEX 
I: RETURN 
485 FORI= 1 TO 11 
490 K(I) = ABS (CC(1)): NEXT I: FORI = 1 TO 
ii — 1: FORJ=I+1 TO 11: IF Ktga) 
= KI) GOTO 
495 K1 = KCI):K(1) Fi 
500. NEXT J: NEXT = 1 TO li: FOR 
Ia 1 T011 
505 IF K(A) = ABS (C(0)) THEN GOSUE 415:H 
(8) = C$(J) + R$ 
510 NEXT J 
SISSA = A+ 1: NEXT I 
520 H(13) = H(1):s FOR I = 1 TO 12:HH > H(L + 
1): IF He) HI + 1) THEN HH = Hi) + 
1) + 360 = 1 
525 I$ = V$:GG = 0:68 = 0 
530 VTAB R(1,2): 1 TO 11:CC = Kos 
IF AB = 1 AND CC € 90 THEN CC = Co + 
60 
535 IFG > 4 THEN GG = 1 
5340. IF CC è HM) AND CC € HH THEN GOSUB 6° 
S:G=G+1 
5945 NEXT J:AB = O: NEXT I 
555. GOTO 3360 
615 R$ =" O THEN F$& = “Re 
617 CJ) = ABS 
620. RETURN 
625 Z = E(J): GOSUB 310: IF GG = 1 THEM PRINT 
1% TABC 17) STR$ (Di:6G = 0:1% > "":» Goto 
635 
630 HTAEB FR(I,1) 
532 FRINT (H$ (Das IF RTGHTE cH6 
(I), 1) THE INVERSE 3 PRIMT "pv 
: GOTO 
6 FRINT 
b NORMAL FRINT Zi:H& 4) "i RETURN 
Ti SD = € r TANO 
710 SD = 1 + 1.07 % 
1 # TI 
= 84028.,27) TONO: RETI 
2460 
FOR I = 1 TO fi: TNVERSF » 0 chie 1h 
14: PRINT C&iD: SECO RI CEMTEN" 5 MORAL 
1 
1 TR die Media USI THEN finim 
CHES (dI + 480. IFPI I OTHER vai 


HI THEM x& 
INVEFSE 


Pacino si 


TABELLA DEI PIANETI 


SOLE 
LUNA 
MERCURIO 
VENERE 
MARTE 
GIOVE 
SATURNO 
URANO 
NETTUNO 
PLUTONE 
NODO LUNARE NORD 


TABELLA DEI SEGNI ASTROLOGICI 


ARIETE 
TORO 
GEMELLI 
CANCRO 
LEONE 
VERGINE 
SCORPIONE 
SAGITTARIO 
CAPRICORNO 
ACQUARIO 
PESCI 


Fig. 1. 


3410 FORE = 1 = (EZISI UA STOHITS 
(AS (E) ,3))) " 
IF 14, DI THEM SFETAI 
ug CRESCI "3: GOT 
PRINT YS «» + STR& (HM ad 
Cf + ra GOSUBR SO: PRINT 
PRINT "Son 


GOSUE 
HTAB 14 
MAL »* 


: PRINT "N"; ai 
3470. VTAB 17: HTAB 14: GE 
3472 IF ASC (68) 49 AND ASC (Ge) SA THEN 
I = VAL (6%) - 1 
IF G$ = "*" THENI = 9 
IF G& =" THEN T = 19 
IF G6$="' THEN FUN 115 
VTAB 7: FOR K = 1 TO 11: HTAB 12: FRINT 
di ": NEXT Ks RETURN 
ABS (CI) — COH)): IFY = 
40 
BO: IF (C0I) + CUI) 4 2 180 THEN 
- 180 
CECI) + Edo: / 2 + Wi (RETURN 
5000  VTAB 8: HTAB (10): GET G%$: RETURN 
5010 RETURN 
7335 360:A1 =  FN XC SIN (CRA) * TAN <‘R 
TAN (0B)): FORI = 1 TO 12:D = EN 
U(60 + 30 * I) 
7340 A2 = D / 90 — 1:kN = 1: IF D = 180 THEN 


9000 


9005 


9010 


9015 


9020 


9025 


9040 


9045 


9050 
9055 


KN = - 1:A2=D/ 90 - 3 
AZ = FN RC FN UC FN DIRA) + D+ A2X FN 
DIAL))) 
X = ATN € SIN (AZ) / ( COS (AZ) * COS 
TAN (E4) X SIN (08)))>: IF 
O THEN X = X + FI 
(A3) O THEN X 
FN D(X) + SD S0SUR 
Z%: NEXT I: 
RA + FN R(30):FF GOSUE 
FN U(L + 180) :HS% FLACI 
FN R(60):FF = 1.5: BOSUE 
FN UL + 120):FF = 1: GOSUEB 9 
Li 
FN R(U120) FF UR 
= L:Ri = RA + 
GOSUB 9030:H(3) = L:H(4) =  FN U(MC + 
180): FORI 1 TO 6:HI) = FN UCHEE) + 
SD): NEXT I 
FOR I = 1 TO 6:7 = FN UCHil) 
(I #6) Z: GOSUE ZF10:H$(] + 
Z = HC(ID: GOSUB F1O:H8(I) = 27%: 
RETURN 
= 1 THEN * = 1 
101XX FN YeX * GIN cK 
X TAN (MI): TF Xx O THEN 
/ UFF): 1F Y = 1 THEN R3 = 
/ EF) 
IsL = ATH (TAN ciò) < eos 
O THEN L * RI 
IF SIN (Ri) O THEN L = L + PI 
L = FN D:L): RETURN 


franco muzzio 
editore 
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Il piacere del computer è /a prima collana inte- 
ramente dedicata alle applicazioni hobbystiche 
e professionali del personal computer. Questi 
libri descrivono l'hardware e il software, inse- 
gnano la programmazione in vari linguaggi, of- 
frono molteplici applicazioni e informazioni pra- 
tiche. Per conoscere gli altri titoli finora ap- 
parsi (relativi al PET/CBM, all’Apple, al Basic, 
al Pascal, al TRS-80 e ad altri argomenti) chie- 
dete il catalogo generale a 


franco muzzio & c. editore 
via bonporti 36 - 35100 padova 


cognome e nome 
indirizzo 


cap, località 


Backgammon 


Computer: TRS-80 
Modello : mod. 1 


Configurazione: 16 K 


Il Backgammon, meglio conosciuto dalle nostre 
parti come Tric-Trac o Tabla, è un gioco per due 
persone che si gioca su una scacchiera con due 
dadi e quindici pedine per ciascuno. 

Di antichissima origine orientale, il Backgam- 
mon è il gioco nazionale in Grecia e in Egitto. Non 
molto conosciuto in Italia, sta incontrando ultima- 
mente un grande successo negli Stati Uniti e in 
Inghilterra dove sono sorti circoli dedicati esclusi- 
vamente a questo affascinante gioco. 


Regole del gioco 


La scacchiera è formata da 24 punte divise in 
quattro quadranti: un settore interno e uno ester- 
no per ogni giocatore. La posizione iniziale dei 
pezzi è mostrata in fig. 1. Le pedine vengono mos- 
se da una punta all'altra in base ai numeri che 
escono dal lancio dei dadi. 

Se i due dadi sono diversi, il giocatore può muo- 
vere due pedine distinte attribuendo a ognuna il 
punteggio di un dado, oppure muovere solo una 
pedina della somma dei due punteggi. | dadi van- 
no considerati sempre separatamente cosicché an- 
che muovendo una sola pedina non si fa una sola 
mossa, bensì due. 

Ciò significa che se i dadi indicano 2 e 6, uno 
stesso pezzo può essere mosso prima di sei punte 
e poi di due oppure prima di due o poi di sei. 

Quando una pedina viene spostata su una punta 
per la prima parte di una mossa si dice che è 
“atterrata” su di essa. 

Se invece i numeri usciti sono uguali, il giocato- 
re deve giocarli quattro volte. Esempio: se esce un 
doppio due può giocare: 

una pedina di due punte per quattro volte; 
due pedine di quattro punte ciascuna; 

due pedine di due punte e una di quattro; 

una pedina di sei punte e una di due; 

quattro pedine di due punte ciascuna. 
Se almeno due pedine di uno stesso giocatore si 
trovano su una punta, esse formano un nastro e 
nessun pezzo dell'avversario può né fermarvisi né 


Or 


Autore: Adam Scott 
Versione italiana: Pietro Canevarolo 


Note: Disponibile su dischetto 


atterrare su quella punta. Una punta bloccata da 
un nastro non è solo utile per fermare il nemico, 
ma serve anche come base per le proprie pedine. 
Se su una punta si trova un solo pezzo questo può 
venire cacciato (tolto dalla scacchiera) se una pedi- 
na avversaria atterra o vi si ferma. Le pedine man- 
giate vengono messe sulla linea mediana che divi- 
de in due parti la scacchiera in senso verticale e 
devono ricominciare il gioco dall'inizio prima che 
possa essere effettuata qualsiasi altra mossa, fa- 
cendo così perdere preziosi turni di gioco. 

Quando un giocatore ha riunito tutte le sue pedi- 
ne nel settore di arrivo (chiamato “casa”) può co- 
minciare a toglierle dalla scacchiera in base sem- 
pre al lancio dei dadi. Vince chi porta tutti i suoi 
pezzi fuori dalla scacchiera. 

Ci sono tre possibilità di vittoria: normale, se 
l'avversario ha tolto almeno una pedina; il gam- 
mon, che vale il doppio, se l'avversario non è riu- 
scito a togliere nessuna pedina e il backgammon, 
che vale tre volte la posta, se l'avversario ha pedi- 
ne fuori oppure nel settore interno dell'avversario. 

Per iniziare il gioco si deve tirare un dado cia- 
scuno: inizia chi ha avuto il punteggio più alto. 


Strategia elementare 


Visto che è meno probabile ottenere punteggi 
elevati lanciando i dadi di quanto sia possibile ot- 
tenerne di bassi, si deve sempre cercare di non 
accumulare le pedine sulle punte più distanti dal 
bordo, ma di raccoglierle invece il più possibile vi- 
cino all'uscita. Sempre per lo stesso motivo se si 
riesce ad affiancare più di un nastro, proporzional- 
mente al numero dei nastri vicini cresce anche la 
difficoltà per l'avversario a superarli. 

Le pedine isolate sono sempre pericolose, ma, 
se le pedine dell'avversario sono state tutte supe- 
rate, allora non ha più importanza se le pedine ri- 
mangono isolate a meno che non abbiate intenzio- 
ne di mangiare qualche pedina del vostro avversa- 
rio che, rientrando, potrebbe di nuovo minacciare 
le vostre pedine isolate. 
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Il programma 


Il p 
re la 


rogramma qui descritto provvede a disegna- 
scacchiera sullo schermo, tirare i dadi per il 


computer e per lo sfidante e controllare la validità 


delle 


mosse digitate da tastiera. Per eseguire le 


mosse scrivere il numero della punta di arrivo e 
quella di partenza, separati da un segno meno (—). 


Le varie mosse vanno separate tra loro con un 
punto. 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


HOONO UDINE 


TIRIIFIZA II EIA AEREA SIR IR RIALZATA 
BACKGAMMON 
VERSIONE TRS-80 MOD. I 


PERSONAL SOFTWARE 


PERE 


* 
* 
* 
* 
* 
* 
x 


td.32.032$03t322t023%330023222t2022t2032t20222221 


CLEAR 100 


12 DEFINT A-Z 


20 DE: 
25 DI 


=) 
M B(35) :L=0 :M=0 :1V=0 rI=0 13=0 1J1=0 sK=0 : 


J2=0 :J3=0 


30 DI 


M HD(27),DI(4) ,MV(2,4) ,E5(2,4),07(2,16),DH(4) 


32 CLS: PRINT: PRINTTAB(22), "BACEGAMMON": PRINT 
33 PRINT"NOTE SUL GIOCO: ": PRINT 


#1) SE HAI UNA PEDINA FUORI, DEVI PRIMA FARLA " 


PRINT"2) SE NON PUOI MUOVERE BATTI" 
PRINT"3) NON VIENI AVVISATO SE " 


3 "DIMENTICHI DI TOGLIERE LE PEDINE." 


36 PRINT"IO IMPIEGO CIRCA 40 SECONDI FER MOSSA." 


PRINT 


3VM=5 sVL=-2 sVF=10 :VA=-1 1: 


PRINT"TU PUOI IMPIEGARE QUANTO TEMFO VUOI." 


PRINT 

37 INPUT"HAI MAI GIOCATO CON ME"3A$: IF A$="NO" 
GOSUE 20000 

40 DATA 2,66,130,194,3,67,131,195,1,65,129,193,0, 
64, 128,192, 194,130,66,2,195,131,67,3,193,129, 
65,1,192,128,64,0 


SO FOR L=1 TO 2: FOR M=1 TO 16: READ Q7(L,M): 


NEXT ML 
60 FOR L=0 TO 27 :B(L)=0 :NEXT :B(24)=-2 :B(1)=2 r 
B(19)=5 :B(6)=-5 :B(12)=5 : B(13)=-5 :B(17)=3 


:EB(8) 


3 sLVv=ai 


80 GOSUB 10000 


90 GOSUB 11111: IF DI(I 
9896, "IL MIO DADO E” 


100 I 


1 (2) THEN 90 ELSE PRINT 
I(1)s"IL TUO E”"sDI (2); 
F_DI(1)<DI(2) THEN PRINT" FARTI TU.": ELSE 


PRINT"PARTO ID. "; 
110 FOR L=1 TO 2000 :NEXT 


IF DI(1)>DI(2) THEN 135 ELSE 120 


115 GOSUB 11111 
120 GOSUB 1000 :PRINT9896, TAB (63) 33 PRINT 


GOSUR 2000 


1350 GOSUB 11111 sPRINT92960, TAB (63); 


5 PRINT9896, TAB (63) ;: PRINT9896, - 


« «UN ATTIMO CHE STO FENSANDO..." 


140 PRINT9960, "I MIEI DADI SONO" DI (1) 3DI(2); 


150 GOSUB 5400 


:GOSUE 2000 


160 GOTO 115 


1000 
1010 
1020 


1025 


1030 
1040 
1060 
1070 


90 


REM 

IF NOT FOINT (4,19) GOSUB 10000 

PRINT9832, TAB(63) ;: PRINT983I2, 

"I TUOI DADI SONO 1(1)3DI(2);". MUOVI"3 
IF B(26)<>0 AND E(25-DI(1))%1 AND 

E(25-DI (2)) >1 PRINT" NON PUOI ENTRARE!":+ 
FOR L=1 TO 2000: NEXT: RETURN 
A$="" : INPUT A$ :IF LEFT$(A$,1)< 
1040 ELSE GOSUB 10000 :G0T0 1020 
GOSUB 3000 :IF 0<>0 THEN 1095 
FOR L=1 TO MS :FOR M=1i TO 2 

IF MV(M,L)=0 THEN MV(M,L)=25+M 


THEN 


Il calcolatore impiega circa mezzo minuto per 
ogni mossa, ma se la partita è in una fase critica 
può “pensare” anche per cinque o dieci minuti di 
seguito! Ciò è dovuto essenzialmente al fatto che 
viene utilizzato l'interprete Basic anziché un com- 
pilatore, ma il livello del gioco del computer ripa- 
ga senz'altro il tempo impiegato per giocare. 

Buona fortuna!!! 


10BO NEXT M,L 

1090 GOSUE 4000 

1095 IF Q=0 THEN 1110 

1097 PRINT9896, "--ERRORE-- ": 

1100 IF Q=2 PRINT"DEVI PRIMA RIENTRARE"; 
1101 IF PRINT"RIPRDVA"; 

1102 IF 3 PRINT"POCHE MOSSE"; 

1103 IF PRINT"CONTROLLA I DADI"; 


1104 IF PRINT"TROPPE MOSSE 
1109 PRINT" -— HAI MOSSO: ":A$;: FRINT9B832, TAB (63); 
.3 GO0T0 1020 


1110 IF MS<1 THEN RETURN ELSE FOR I=1i TO MS 

1120 IF B(MV(2,I))=1 THEN QF=MV(2,I) :07T=0 : 
GOSUE 9000 

1130 QF=MV(1,I) :0T=MV (2,1) :G0SUB 9000 

1140 NEXT I :RETURN 


2000 REM 

2010 IF E(25)=15 THEN LO=LO+1 :A$="O IO0!"; 
GOTO 2030 

2020 IF E(27)<>-15 THEN RETURN ELSE WI=WI+1 
3A$="I TU!" 

2030 PRINT9896, TAB(63); :PRINT9896, 


"VINC";A$;" HAI VINTO"3WI; "VOLTE E PERSO"? 
LO; "PARTITE. "; 

2040 INPUT"GIOCHI ANCORA":C$: IF A$="SI" THEN 60 
ELSE CLS: END 


3000 
3020 
3030 L=0 è: 
3035 IF M>3 THEN O=1 :RETURN 
3040 +1 :GOSUB 3300 :MV(1,M)=0 :L=L+1 
3050 
3055 IF LSLEN(A$) THE 
3060 IF MID$(A$,L,1) 
3070 L=L+1 :GOSUB 3300 
0=5 : RETURN 
3080 N=M :FOR M=N+1 TO N+Q-1 :MV(1,M)=MVC(1,N) 
3 MV (2, M)=MV(2,N): NEXT sM=N+Q-1 
3090 IF L<LEN(A$) THEN IF MID$(A$,L,1)="," 
THEN 3035 ELSE O=1 :RETURN 
3100 Q=0 :MS=M :RETURN 
3300 REM 
3310 B$=MID$(A$,L,1) :C$=MID$(A$,L+1,1) 
3320 IF C$>="0" AND C$ 9" THEN L=L+1 :E$=B$+C% 
3330 Q=VAL (B$) :L=L+1 :RETURN 
4000 REM 
4010 FOR L=0 TO 27 :HD(L)=E(L) sNEXT :0=1 
4015 IF MS=0 THEN 4110 
4020 FOR L=1 TO MS :FOR M=1 TO 2: N=MV(M,L) 
4030 IF N“1 OR N>27 OR N=25 THEN 420 
4040 NEXT M.L 
4050 FOR L=1 TO MS :0T=MV(2,L) :0F=MV(1,L) 
4060 IF B(OT)>1 OR B(QF)*-1 THEN 4200 
4062 IF B(26)<>0 AND (QF<>26 OR OT<19) THEN 
0=2 :G0T0 4200 
4070 B(QF)=E(0F)+1 :B(0T)=B(OT)-1 sIF RiOm)=0 
THEN E(QT)=-1 
4090 IF QT=27 THEN N=E(26) :FOR M=7 TO 24 : 
N=N+ (E (M)<0) :NEXT: IF N<>0 THEN 4200 
4100 NEXT L 
4110 GOSUB 6500 
4120 FOR L=0 TO 27 :E(L)=HD(L) :NEXT :RETURN 
4200 GOTO 4120 
5000 REM 
5010 FOR L=0 TO 27 :HD(L)=E(L) :NEXT L: 2737 


:0=0 : RETURN 


IF M+0-13DN THEN 


NERO 


24 23 22 21 20 19 

5020 V: FOR L=1 TO DN :0N L GOTO 5025, 

Si Ia 5035, 5040 

M=J sMi=J+D :G0T0 5044 

M=J1i :Mi=J1+D1 :G0T0 5044 

M=J2 :M1=J2+D :G0T0 5044 

M=J3 sM1=J3+D 

REM 


5060 
5070 


IF Z=1 AND Mi1>25 
FOR M9=18 TO M.1 


AND Mi<999 
3 IF B(M9)<1 THEN NEXT 


IF Mi1>24+Z IF 
:G0T0 5070 


M1<999 THEN V=-10 


IF M>24 OR Mi>24+Z THEN V=V-100 :G60T0 5060 
E(M)=B(M)-1 
IF B(M)>-1 THEN B(M1)=E(Mi)+1 sIF B(M1)=0O 


THEN B(Mi)=1 =V+VT sIF 


Mi<11 THEN V=V+VT 


1B(26)=B(26)-1 


IF E(M)<O IF B(25)>14 THEN V=10000 » 
GOTO 5070 :ELSE V=-10000 :G0T0 5070 
AND M1=25 THEN V=V+VFE 

) FOR LL=0 TO 18 :sIF E(LL)<1 
NEXT LL :2=1 
: GOSUE 8000 
TO 27: B(L)=HD(L) :NEXT Ls: 


sa RETURN 


BIANCO 


5200 
5201 
S210 


5220 


5430 
5440 
5450 
5452 


5455 


18 17 16 15 14 13 


REM 
IF DE=1 PRINT9832, "DAL © BAR" ": 
IF B(0)=O OR DN“1 THEN RETURN 


FOR I=i TO DN : J=DI(I) sIF B(3)<>-1 THEN 
5240 ELSE OF: OT=26 :GO0SUB 9000: OF=0 : 
QT=J :GOSUR 

DI C(I)=DI (DN) :G0T0 S210 

NEXT I DI (I) sIF B(J)=si 
THEN QI :G0T0 S230 
NEXT I J=DI (I) sIF B(I)>-1 
THEN QI O :G0T0 S230 
NEXT I INTOCR," NON FOSSO MUOVERE! ";: 
RETURN 

REM 

PRINT". MUOVDO: "; :CR=960+FOS(0) :Z=0 

IF DB=1 FRINT2A832, TAB(63) ; 

L=0 :FOR I=0 TO 18 :L=L+(BCI) 0) sNEXT I 
IF L=0 THEN 1 :Lv= 

GOSUB 5200 

IF DN=0 OR B(0) © THEN 5470 

IF Z=0 THEN 5460 

IF B(26)=0 FOR L=i TO DN: 

FOR M=25-DI(L) TO s IF B(M) 1 NEXT Mi 
IF B(25-DI(L.))<1 THEN NEXT L ELSE 
QF=25-DI(L) :07T=25 :G0SUB 9000 :D](L>=0 » 


5458 
5460 
5470 
5700 
5705 
5710 
5720 
5730 


5740 
65000 
6001 
£010 


6012 
6014 


6019 
6020 
6030 
6035 
6040 
6050 
6055 
6060 
6065 
6070 
6080 


6085 
6090 
6095 
6100 


6110 


6120 
6125 
6130 
6140 


6141 
6145 


6150 
6160 
65500 
6510 
6515 
6520 
6530 
6540 
6550 


6560 
6570 
6580 
6590 
6600 


6605 
6610 
6620 
6630 
6640 
6650 
6700 
6710 
7000 
7001 
7010 


92 


NEXT L 


M=0 :FOR L=1 TO DN =IF DI(L)<>0 THEN 
M=M+1 :DH(M)=DI(L) 

NEXT L sIF DN“>M :FOR L=1 TO DN :DI(L)= 
DH(L) :NEXT L :DN=M 


IF DN<1 THEN 5450 

IF DN<“3 THEN GOSUB 7000 ELSE GOSUE 645000 
FRINT9896, TAB(63); :RETURN 

REM 

IF DB=1 RETURN 

IF FG=0 THEN FG=1 


FG=-FG :FT=896+17 
IF FG<O THEN FRINTAFT,CHRS( 3"PENSO..."; 
ELSE FRINTAPT,CHR$(30) 3 "STO FENSANDO...": 
RETURN 
REM 
a DE=1 FRINT9832, "MOSSA DOFFIA. 
» D=DI(1) :D1=D :E=24 :NM=0 
3J1=999 :J2=999 :33=999 
3 IF Lv=2 THEN 6019 
FOR L=1 TO 24 IF B(L)<>-1 THEN NEXT L 


ELSE: 
THEN NEXT L ELSE IF B(K)<-1 THEN NEXT L ELSE 


K=L: FOR M=1 TO DN/2 :K=K-D :IF K<1 
IF B(K)>1 THEN EG=1 
IF Z=1 THEN B 
FOR J=1 TO E 
THEN 
IF Z=1 IF J+D 
NEXT J :J=999 
FOR J1=J TO E 
IF Ji=J IF K<2 
IF KSO THEN K3B(J1+D) 
IF Z=1 IF Ji+D1>2 
NEXT Jl: J1=999 
GOSUB 5700 


ELSE NEXT M,L 
F*DN/2+VM 


IF MX3-50 THEN 6150 ELSE 6140 
F J1=J+D THEN k=1 


RIF 
25 THEN 6080 

3 IF MX>-50 THEN 6040 
:FOR Seri TO E 


—2 THEN 6080 


ELSE 6140 


1 IF Ji= do IF Kg3 THEN K=0 
O THEN K=B(J2+D) :sIF K>-2 THEN 6110 
IF Z=1 IF J2+D>25 THEN 6110 


NEXT J2 :J2=999 :IF MX>-S0 THEN 6070 
ELSE 6140 

GOSUB 5700: IF DN<4 THEN 6140 ELSE FOR J3 
TO E :K=B(J3) : IF J3=J1+D OR J3=J2+D OR 


J3=J+D THEN 
IF K>O THEN J3+D) sIF K> 
THEN 6140 
1IF MX3-SO THEN 6100 
GOSUB S000 :IF V>MX THEN MX=V: NM= 
:BS(1,1)=J :BS(2,1)=J+D :BS(1,2)= 
BS(2,2) =J1+D: BB(1,3)=02 : BS(2 13) =924D 
BS(1,4)=J3 :B5(2,4)=J3+D:IF DB=1THEN 
PRIN E VIII0IN09;98) 
IF MX>=BG THEN 6160 


IF_J3<>999 THEN 6130 ELSE 


—2 THEN 6140 


J3=999 


IF_J2< 3999 


THEN 6100 ELSE IF J1<>999 THEN 6070 
ELSE IF J<%999 THEN 6040 

REM 

GOTO 7120 

REM 

FOR L=1 TO 4 :DH(L)=DI(L) :NEXT L 
IF_MS=0 THEN 6570 

FOR L=1 TO MS 

QF=MV(1,L) :IF QF=26 LET Q1 

QT=MV (2,L) :IF OT=27 LET ® 


FOR M=1 TO DN :IF QF-QT=DH(M) 
ELSE NEXT M 

NEXT L 

FOR L=1 TO DN 

IF DH(L)=0O THEN 6700 


THEN DH(M)=0 =: 


REM 

D=DH(L) :IF B(26)<%0 IF B(25-D)>O THEN 6700 
ELSE Q=2 OTO 6710 

Q=3 :3IF MS=DN THEN 0=4 


FOR M=1 TO 24 
IF B(M)>-1 THEN 6650 


N=M-D :IF Nei THEN 6650 

IF B(N)<1 THEN 6710 

NEXT M 

NEXT L :0=0 

RETURN 

REM 

IF DB=1 PRINT9832, "REGOLAMENTARE. "3: 
MX=-9999 : NM=0 


7020 
7030 
7040 
7045 
7050 
7060 
7065 
7070 


7080 
7085 
7090 
7100 


7105 
7110 
7120 


7130 
7133 


7135 


7140 


7150 
7160 
8000 
8010 
Bozo 


Bo3o 
8035 
8040 
8050 


8060 


B065 
B070 
8075 
BOBO 
8085 
8087 
8090 
8095 


B096 
8100 
9000 
9010 
9020 
9030 
9040 
9050 
9060 
9065 


9070 


9080 
9100 
ilo 
9120 
9125 

9130 


9140 
10000 
10010 


10020 


FOR I=1 TO DN :D=DI(I) : 3J1=999 
FOR J=1 TO 25-D+Z%(D-1) 

IF K>O THEN K=B(J+D) sIF K> 7060 

IF Z=1 IF J+D>25 THEN 7060 

NEXT J :J=999 :IF MX>-50 THEN 7110 ELSE 7100 


IF DN=1 THEN 7100 


K=J :IF K<24 IF I=2 OR B(K)<2 LET K=K+1 
GOSUB 5700 :FDR Ji=K TO 24 :K=B(J1) 

sIF J1=J+D THEN K: 

IFK THEN K=B(J1+D1) :IF K>-2 THEN 7100 


IF Z=1 IF Ji+D1>25 THEN 7100 

NEXT Ji :J1=999 :IF MX>-50 THEN 7050 
GOSUB 5000 :IF V>MX THEN MX=V: NM=1 
:BS(1,1)=J :E5(2,1)=J+D 

s2)=J1 :BS(2,2)=J1+D1 
PRINT"%"3MX;J;J+D3J1;J1+D1; 


IF J1<>999 THEN 7090 ELSE IF J<>999 THEN 7050 
NEXT I 

IF NM=0 PRINT9CR, "NON FOSSO MUOVERE! ":: 
RETURN 

NM=0 :FOR L=1 TO DN :FOR M=1 TO 2 

IF Bata AND ES(M,L)<>999 THEN 
ES(M,L)= 

IF BS(M, L)<o OR ES(M.L)>=999 THEN 7160 
ELSE NEXT M 

IF B(BS(2,L))=-1 THEN OF=ES(2,L) :0T=26 
GOSUB 9000 

QF=ES(1,L) :0 5 (2,1) :G0SUB 9000 :NM=1 
NEXT L_:IF NI THEN 7120 ELSE RETURN 
REM 

IF Z=1 THEN 8040 

FOR TO 18 :IF E‘(L)s0 1HEN 8&c ELSE 
NEXT L: V=V+VM 

FOR L=1 TO 6 :IF E(L)>0O THEN V=V+E(L)*VL 
NEXT L 

M=26 :IF B(26)<>0 THEN 8070 

M=0 :FOR L=24 TO O STEF 1 :IF M=0 IF 


B(L)<O LET M=L 


IF _M=0 OR B(L)<=0 THEN NEXT :V=V+VH :G0T0 
8100 

REM 

FOR L=1 TO 24 

IF B(L)<>1 THEN 8090 

IF L<7 THEN V=V+VP-VL :G0T0 8090 

IF L>M THEN V=V+VA ELSE V=V+VF 

IF L>18 THEN V=V-VOXB(26) 

NEXT L 


IF B(26)=0 THEN 8 ELSE FOR 
L=19 TO 24:IF B(L)=1 THEN M=0 ELSE IF 
E(L) >1 THEN M=M+1 :NEXT L :ELSE NEXT L 
IF _M<>6 THEN V=V+(MX3-1)/2 ELSE V=V+35 
RETURN 

REM 

S=SGN F_S=0 RETURN 

04% 1 THEN 0Q48=' 

o= ABS(E (OF) ) 3B(0F)=E(0F)-S :02=0F 
GOSUB 9100 :PRINT901," ": 


E(DT)=R(OT)+S5 :0=AES(B(OT)) 
GOSUR 9100 :PRINT901,04%; 
B$=MID$ ("##",1,2+(0F<10)) 
:C$=MID$ ("##",1,2+((0T<10)OR(QT=25))) 
PRINTOCR, ""3 :PRINTUSING B$;0F; 


sa PRINT 


33 PRINTUSING C$;-QT%(0T<25): :PRINT 
CR=960+POS (0) 
RETURN 
REM 
Q3=1 La 02>0 AND 0225 THEN Q3=CINT(02/13)+1 


Q3=2 


Ò OR Q2=26 THEN 0D4=155+320% (2-03) ELSE 
5 OR 02=27 THEN 04=187+220% (2-03) ELSE 
%18 THEN 0Q4=128+33+(02-19)X4 ELSE 

IF Q2>12 THEN 04=128+(02-13)%4 ELSE 

IF Q2>6 THEN Q4=448+(12-02)%4 ELSE 

04=448+33+ (6-02) %4 


IF Q2 


Q1=07(03,0)+Q4 :RETURN 

REM 

CLS :PRINT9768,; :FOR L=12 TO 1 STEP -1: 
PRINTUSING" ##"sLs:IF L=7 THEN PRINT 

n BAR "s ELSE IF L=1 PRINT" FUORI"% 
NEXT :PRINTI0,;: TO 24 :PRINTUSING 
" ##"3Ls: IF L=18 THEN FRINT" BAR "a 


ELSE IF L=24 PRINT" FUORI"; 


10025 NEXT 
10030 PRINT9384,; :FOR L=0 TO 56 STEP 2 :PRINT 
CHR$ (140); CHR$ (032); :NEXT :FRINTO3B4," "i 
10040 FOR L=65 TO 118 STEP 4 :FOR M=L TO 
L+6540 STEP 640 
10042 IF L>86 AND L<97 THEN 10049 
10043 
10045 
10048 
10049 NEXT M,L 
10050 FOR L=49 TO 65 STEP 16 :FOR M=0 TO 37 =: 


SET (L,M) :NEXT M.L 
10060 REM 
10070 FOR Q2=0 TO 27 :IF B(02)=0 THEN 10110 


100B0 FOR Q=1 TO ARS(R(02)) :GO0SUR 9100 

10090 IF B(Q2)<O THEN FRINT9201,"X": ELSE 
PRINT9O01, "O"; 

10100 NEXT 

10110 NEXT 

10120 RETURN 


11111 FOR RR=1i TO RND(100) :DI(1)=RND(6) :NEXT 
3 RANDOM 

11121 FOR RR=1 TO RND(100) :DI(2)=RND(6) :NEXT 
3: RANDOM 

11130 IF DI(1)=DI(2) THEN DN=4 :DI(3)=DI(1) 


:DI(4)=DI(1): RETURN 

11140 DN=2 :RETURN 

20000 REM ISTRUZIONI 

20010 CLS: FRINT"LE REGOLE SONO QUELLE ": 
"INTERNAZIONALI." 

20020 PRINT"SCRIVI LE MOSSE DA-A-VOLTE E ": 
"SEPARA OGNI MOSSA CON UN PUNTO." 

20025 PRINT 

20030 FRINT"ESEMPIO: FER MUOVERE DUE VOLTE ": 
"DA 2A 1," 

20040 PRINT"SCRIVI:":TAR(25) 

20045 PRINT 

20050 PRINT"FER MUOVERE DA 3 A 2 E DA 
:» PRINT"SCRIVI:":;: PRINTTAB(25) 7 

20060 PRINT 

20070 PRINT"PER MUOVERE DA 7 A 6, DA 5A4E ": 
“TOGLIERE DUE FEDINE DALL” FRINT 
"SCRIVI:":: PRINTTAB(25) "7-6. 4,1-0-2" 

20080 PRINT 

20090 PRINT"NOTA CHE SIA CHE IL "BAR 
“IL FUORI SI INDICANO CON 0." 

20100 FRINT"SCRIVI SCACCHIERA SE NON CAPISCI ": 
"A CHE FUNTO E” IL GIOCO." 

20400 INFUT"SE SEI FRONTO PREMI =ENTER=":5$: 
RETURN 


CHE "; 


Collisione 


Computer: Apple Il 
Modello: Europlus 


Configurazione: 32 K 


Autore: A. Giovannetti 


Note: Disponibile su dischetto 


Questo è uno dei primi giochi elettronici apparsi 
nei nostri bar qualche anno fa. 

La base del gioco è un tabellone composto di 
cinque cornici concentriche, ognuna ricoperta di 
mine che devono essere eliminate dal giocatore. Il 
vostro veicolo è un razzo che segue le piste in sen- 
so antiorario, mentre il computer sposta il suo in 
senso orario cercando di scontrarsi con il vostro. 

Per fortuna ci sono quattro punti sul percorso, 
nei quali potete cambiare corsia ruotando il poten- 
ziometro della paletta n. 1. Potete anche raddop- 
piare la vostra velocità premendo il pulsante sulla 
paletta. 

Ogni mina che riuscite a togliere dal percorso ha 
il valore di un punto. Ogni tanto il computer lascia 
sul suo percorso un altro tipo di mine (più grandi) 
che valgono invece cinque punti. Se riuscite a ri- 
pulire un intero tabellone, automaticamente ne ri- 
comparirà uno nuovo. 


Il programma usa una tabella di tre tipi di carat- 
teri speciali: il primo per disegnare le mine, il se- 
condo per le mine da cinque punti e il terzo per 
disegnare il vostro razzo. Esso usa pure le istruzio- 
ni PEEK e POKE per memorizzare il tabellone, in- 
vece di una matrice che avrebbe occupato più me- 
moria e avrebbe reso l'elaborazione notevolmente 
più lenta. 

Notate che in tutto il programma viene usata 
una sola istruzione DATA. 


Variabili principali 


A, A$, B sono usate con l'istruzione POKE per me- 
morizzare i caratteri speciali per le mine e il raz- 
zo. 

C conta le mine rimaste. 

DC, DD, DY contengono un identificatore della di- 
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rezione del movimento dei razzi. 


HS è il punteggio massimo ottenuto fino all'ultimo 


turno. 


L è un puntatore per le tabelle in memoria. 


| è un contatore di ciclo. 


LC, LD, LY indicano in quale cornice si trovano i 
razzi (1 per la più interna, 5 per la più esterna). 
R è un numero casuale che determina la posizione 


delle mine. 


RK contiene il numero delle cornici svuotate. 


S è la prima locazione di memoria che contiene il 


* 
* 
* 
% 
* 
* 
x 


tabellone. 

1 REM ODDDODGRUOOLOROPOROROSOCONOOPOBOOSOOOOSONOE 

2 REM * 

3 REM %* COLLISIONE 

4 REM X VERSIONE AFFLE II 

5 REM x 

6 REM * FERSONAL SOFTWARE 

7 REM X 

8 REM PUOAUUUUOSOGROOPOUSOROOOPA FUSI CORIO 

48 HOME 

SO INPUT “VUOI-LE ISTRUZIONI? "372% 

S3 IF LEFT$ (ZZ8,1) = "S" THEN GOSUB SoGo 

ss 5 

60 IF PEEK ( - 16297) A27 THEN: T = £ 

65 HCEOLOR= 0: ROT= DY % 16: DRAW Z AT 6 +1 
2% XY,6 + 12% vv 

70 IF ABS xy - 11) 1 AND ABS (VYY - 6) 
1 THEN 110 

75 ON DY GOTO 80,85,90,95 

80 IF XY = 12 THEN iso 

32 Xe INT € PL dî , 8) — dal aly 8 
W = YV + Zi IF LY < 1 OR LY > 5 THENL 


YELY- Zivy è N= Z 

84. G0T70 i50 

5 IF YY = S THEN i50 

87 Z= INT < PDL (0) / 86) - 

x - Zi 
Ya lY_ Zixy=xy +2 

89. GOTO 150 

90 IF XY = 10 THEN 150 

92 2= INT € FDL (0) / 84) — lily=a Va 
W= Wo Zi: IFLY € 1 
YVELYV- Zivw= yy +2 

94. GOTO 150 

95 IF YY = 7 THEN 150 


97 2= INT ( PDL (0) / 86) D:LY SLM +# 
XY = XV * Zp FLY < 1 OR LY S THE 
YES Zret = ANS 

99. GOTO 150 

110 IF AES (xy - 11) LY + 6 OR AES € 
6) < 


LY + 1 THEN 150 
120 DY = DY — 1: IF DY = O THEN DY = 4 


150 ON DY Goto 160,170, 180,190 
160 xy c 


XY + 1: GOTO 200 
170 YY = YY + 1: GOTO 200 
180 XY = XY - 1: GOTO 200 


190 YY = w.- i 


200. IF XY = XC AND vY = YC THEN 10 
205 IF RK > 


2 THEN IF XY = 
1013 

210 Z = XV % 13 + vv + S: IF PEEK (Z) 
240 

220 ROT= 0: DRAW PEEK (Z) AT XY % 12 + 
Y % 12 + 6:5C = SC + ( PEER (2) — 1) 
4 + l:C = C - 1: POKE 7,0: VTAB 22: 
1: PRINT SC ; 

230 IF C = 0 THEN 1015 

240 2 THEN T = 1: GOTO 110 

250 7: ROT= DY # 16: DRAW 3 AT X 


12 + 6,YV kK 12+6 
260 IF RE > 2 THEN T = 2:54 = 1 
+ 1 GOTO 300,500 


- SU: ON 


z: 


OR Ly 5 THEN L 


Z: 


NL 


yy 


XD AND YY = YD THEN 


1 THEN 
CARS 

* 
HTAB 


vox 


SU 


SC contiene il punteggio attuale. 


SW stabilisce quale dei due razzi del computer de- 
ve muoversi (solo dopo che sono stati comple- 


tati due tabelloni). 


T conta i passi del razzo del giocatore (se il pulsan- 


te è premuto, vale il doppio). 
X, Y coordinate del tabellone. 


XC, YC, XD, YD, XY, YY coordinate dei tre razzi 


(due del computer e uno del giocatore). 


Z usata per immagazzinare i risultati parziali dei 


calcoli. 
300. HCOLOR= 0: ROT= DC * 16: DRAW 3 AT XL * 
12 + 6,YC % 12 + 6& 
305 Z = PEEK (XC * 13 + YC + S)s IF 7 THEN 


HCOLOR= Z: ROT= 0: 
6,YC * 12 + 6 


310 IF XC< » 11 AND YC € 6 THEN 3 
315 R O: IF RND (1) -95 THENR= 1 
$20; Z =: \.8668N (LY = LC) ALEC = LO + Z 

330 ON DC GOTO 335,340, 345 

Z35 YC = YC — Z: GOTO 400 


XC + 
YE + 
XE = 
ABS (XC — 11) 
6) < LC + 1 
70 DC = DC + 1: IF DC S 
O ON DC GOTO 410,420, 4% 
XC = XC + GOTO 450 
420 YC NES GOTO 450 
430 XC XE — GOTO 450 
440 YC = YC — 
IF XC = XY AND YC = YY THEN 
IF NOT R THEN 470 
457 Z = XC %* 13 + YC + S: IF 
C=C+I 
POKE Z,2 
ESE ® THEN T = ir 
HCOLOR= 5: 
24+ 6,VC% 
GOTO 60 
HCOLOR= 0: ROT= DD * 16: 
12 + 6,YD % 12 +6 
505 Z = PEEK (XD * 13 + YD + S): 
HCOLOR= 27: ROT= 0: DEAD Z AT 
6,YD * 12 + 6 
IF XD « 11 AND YD 5 HEM 
520 Z = SGN (Ly — LD):LD = LD + 7 
ON DD GOTO 535,540,54 CI 
S35 YD = Z: GOTO 600 
Z: GOTO 600 
Z: GOTO 600 
Z: GOTO 600 
ABS ‘XD — 11) LD 
6) < LD + 1 THEN 600 
DD = DD + 1: IF DD 


LC + 60R 


SHEN DC = 1 
4940 


LOL 


6010 
ROT= DC * 16: 
12 + & 


200 


DRAW = AT %f 


IF % 


THEN DD = 1 


O ON DD GOTO 610,620, 630,640 

610 XD = OTO 650 

20 YD YD + 1: GOTO 650 

ZO XD XD — 1: GOTO 650 
640 YD = YD- 1 
650 IF XD = XY AND YD = vVY THEM 104% 
652 YD = YY THEN 1013 
655 = GOTO 500 
660 ROT= DD * 16: DRAD 2 &T xn 


POKE 232,( FOFE 


1011 Hs = SC 154 
1013 HS THEN Hs 
1014 = 0 

1015 RE = RE + 1 


ABS ‘(Ye 


PEEK 2) — o 


DFAU 3 M xD 


+ 4 OF ABS dvD 


DRAVI Z AT XC X 12 + 


THEN 
XD * 12 


+ 


* 


1020 
1030 
1040 


1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1121 
1122 
1125 
1130 
1140 
1150 


1160 
1170 
1180 
1190 
1220 


1230 
1240 


1260 


1270 


HGR =: HCOLOR= 6 
FOR Y = 0 TO 60 STEP 12 

HELOT Y,Y TO 276 = YaY TO 276 = Vyl5é — 
* TO 156 — Y TO YiXY 

NEXT 

HCOLOR= O 

FOR Y 12 TO 48 STEP 12 

HPLOT Y,65 TO Y,91 

HPLOT 276 - Y,65 TO 276 - Y,91 

HPLOT 125,Y TO 151,Y . 

HPLOT 125,156 - Y TO 151,156 - Y 

NEXT 

S = 7716 
FORL=ST0S+ 
HCOLOR= 1: ROT= 0 


98: POKE L,0O: NEXT 
SCALE= 1 


FOR X = 0 T09 
DRAW 1 AT 6 + 12 X X,6 + 12 % Y: POKE 


DRAW 1 AT 270 — 12 * X,6 + 12 % Y: POKE 


130% (22 — XMe+ Y + S,1 

DRAW 1 AT 6 + 12 * X,150 — 12 * Y: POKE 
3KX + CD V) + S,1 

DRAW 1 AT 270 —- 12 * X,150 — 12 X Y: FOKE 


be ® 122 > 2} è tizi VD) + Bi 

NEXT X: NEXT Y 

XC = 10:YC = 12:DC 

XY 12:3YY = 12:DY 

ROT= DY %* 16: HCOLOR= 7: DRAW 3 AT XY % 

12 + 6,YY * 12 * 6 

ROT= DC * 16: HCOLOR= S: DRAW 3 AT XC + 

12 + 6,YC % 12+6 

> 2 THEN XD = 10:YD = O:DD = 1:L 

ROT= DD * ib: DRAW 3 AT XD * 12 + 

12 +6 

3 VTAB 21: FRINT "FUNTI", "RECORD 

PRINT SC,HS è 
i 


NEXT : GOTO 60 


1330 


1340 


4999 
5000 


5050 


5100 


5200 


DO 
16) 


na 
dA 
no 


d 


5400 


S550 


9999 


72 STEP 2 


A MID$ (A$,I,1)) — 48: IFA 

4 A-7 

B= MID$ (A$,I + 1,1)) — 48: IF 

B> 9 THENB=B-7 

POKE L,A % 16 + B:L = L + 1: NEXT I: RETUFN 
END 

HOME : VTAB (2): HTAB (15): INVERSE : FRINT 
"COLLISIONE" NORMAL 


PRINT : PRINT : FRINT 

PRINT "DEVI GUIDARE UN FAZZO FACCOGLI- 
MINE": FRINT "ATTRAVERSO CINQUE CORNICI 
CONTRICHE" 

PRINT "RACCOGLIENDO FIU” MINE FOSSIBIL 
I": FRINT "SENZA PERO” SCONTRARTI È 
L RAZZO “ 

PRINT "DEL COMFUTER." 

PRINT "IL TUO RAZZO GIRA IN SENSO ANTI 
ORARIO, ": PRINT "QUELLO DEL COMPUTER IN 
SENSO ORARIO." 

PRINT "USANDO LA FALETTA N. i FUOI DAM 
BIARE": PRINT "CORSIA, EVITANDO COST” L 
E COLLISIONI." 


FRINT "CON IL FULS: DELLA LETTA F 
UOI": PRINT "RADDOFFIAI LA TUA VELOCII 
A°.": PRINT "IL COMPUTER, FASSANDO NELL 
E CORSIE " 

PRINT "VUOTE, DEFONE DUE TTFI DI MINE 
#: PRINT "LE PIU” PICCOLE VALGONO UM FU 
NTO": FRINT "QUELLE PIU® GRANDI ME VALG 


ONO CINQUE." 

PRINT : INFUT "SE SEI FRONTO FREMI FET 
URN 22%: HOME 

RETURN 


franco muzzio 
novità 


Il piacere del computer è /a prima collana inte- 
ramente dedicata alle applicazioni hobbystiche 
e professionali del personal computer. Questi 
libri descrivono l'hardware e il software, inse- 
gnano la programmazione in vari linguaggi, of- 
frono molteplici applicazioni e informazioni pra- 
tiche. Per conoscere gli altri titoli finora ap- 
parsi (relativi al PET/CBM, all’Apple, al Basic, 
al Pascal, al TRS-80 e ad altri argomenti) chie- 
dete il catalogo generale a 


franco muzzio & c. editore 
via bonporti 36 - 35141 padova 


Desidero ricevere in contrassegno 


pagherò al postino il prezzo indicato più lire 1000 per spese di spedizione 


cognome e nome 


indirizzo 


FL PES 
© ®© ®© © ®© ®© © ®© © © © © ® ®© © 


Computer: Acorn 


Modello: Atom 


Configurazione: espanso 


Autore: Pietro Canevarolo 


Immaginatevi alla guida di una veloce macchina 
da corsa in una strada piena di curve. Le curve so- 
no imprevedibili e dovete fare molta attenzione 
nella guida o rischiate di andare fuori strada. 
Quanta strada potete fare in un giorno? Per quan- 
to tempo riuscirete a sostenere una guida veloce 
intorno al circuito? Con questo programma avrete 
brivido a volontà e senza uscire di casa. 

La difficoltà del gioco è sotto il vostro controllo: 
larghezza della strada e velocità dell'auto vi ven- 
gono richieste all’inizio del gioco. 


Uso 


Il programma si presenta con una breve introdu- 
zione grafica e con alcune spiegazioni su come 
guidare l‘auto. In seguito vi chiede larghezza della 
strada e velocità dell'auto. La larghezza può varia- 
re da 4 caratteri a 15. : 

Più stretta è la strada, più difficile è il gioco. La 
velocità varia da 1 a 100, ovviamente è più difficile 
guidare un'auto a cento chilometri all'ora che farlo 
a passo d'uomo. Un conteggio alla rovescia prece- 
de la partenza della gara: dovrete stare pronti per 
evitare di uscire di strada già alle prime curve. 


10 DIM AALZ) 
15 ##20=0 
ZO 


1725 


(OI=1 TO 
NT$1E 
NT** "USA 


90008 MEXT 


PRINT"SE 
PRINT? 


ZA DELLA 
SZ GOTO 
IMPUT* "VELOCITA? 


26 


MASTO"" "L* AUTO PROSEGUE 


La guida della macchina viene effettuata con i 
tasti SHIFT e REPT nell'angolo a destra della ta- 
stiera. Premendo il tasto SHIFT l'auto si dirigerà a 
sinistra, mentre con il tasto REPT succederà il con- 
trario. Se non premerete nessun tasto l'auto pro- 
seguirà diritta nella sua corsa. 

La corsa continua finché l'auto non va fuori stra- 
da, dopo di che vi verrà mostrato uno schema 
riassuntivo dei chilometri percorsi e dei giorni di 
corsa impiegati. 

Dopo ogni collisione potete scegliere se conti- 
nuare la corsa, premendo il tasto C, oppure rico- 
minciare la gara, con il tasto R, o, come ultima 
possibilità, abbandonare la corsa con il tasto A. 

Sia premendo A che R vi viene mostrata la me- 
dia chilometrica giornaliera che siete riusciti a 
mantenere. 

Ci sono diversi modi di giocare: potete vedere 
quanta strada riuscite a fare in un certo numero di 
giorni, oppure cercare di percorrere un certo nu- 
mero di chilometri, poniamo 1000, nel minor nu- 
mero di giorni possibile. 

Quando vi sarete impratichiti nel gioco, provate 
cambiando la larghezza della strada o la velocità 
della macchina: il programma continuerà a mette- 
re alla prova la vostra abilità nella guida e voi con- 
tinuerete a divertirvi. 


DIRITTÀA" 


(4-1) "hl 


600: PRINT* 3: NEXT 


PRINT* = GOSUE 


PRINT” 
GOSUB 400 

400a1F P#E0015#B0=0 (C=0-1 
IF_?#E0 H4O=D ( +1 
DOO TO VX10 STEP 
o CAD+1 GOSUE 
IB 1000, FOR E TO 


460 FRINT"PER UN TOTALE DI "T" CHILOMETRI IN "N" 
PRINT"O"® 

1 PRINT"I"" 

PRINT"BATTI "0° FER CONTINUGRE"® 


PRINT" *R° PER RIFARTIRE"® 
PRINT" PA PER ABBANDONAR 


LINE ASOLO IF 9P#RC 
IF PER ME TE 
FPRINT"MEDIA DI "TN" © 
IFOP#20=CH"F"  GOTO Z00 
SS0 END 

600 FOR Isili TO 
501 PRINTS2 
606 RETURN 
835-153 D=D-1: IF 
GOTO 400 


RINT® 


MEXT 
Ds FRINT&9; NEXTs FRINT® 


D=b+1 


STRP «(i PRINT 4 


ZIO DO WAITEÙ Ist+is UNTIL 
FIS PRINT8#D: H=H+1 


1 TO Gy PRINTE5S NES 


1400 KR 
16450] 
1700 RETURN 
) END 


4a 


Tastiera d'organo 


Computer: Apple Il 
Modello: Europlus 


Configurazione: 32 K 


Mio figlio di un anno ha scoperto recentemente 
che premendo il tasto RESET del mio Apple Il que- 
sto emette un sonoro bip. 

Dopo dieci minuti di bip-bip, avevo deciso che 
era meglio se gli trovavo qualcosa di più serio e, 
soprattutto, variato con cui divertirsi. E nato così 
questo programma in linguaggio macchina per 
suonare sulla tastiera dell'Apple come fosse un or- 
gano. 

Il programma è diviso in due parti: il vero e pro- 
prio programma che occupa le locazioni di memo- 
ria da $ 1000 a $ 1025 e una tabella di dati memo- 
rizzata da $ 1080 a $ 10FF. 

| dati esadecimali possono essere inseriti in me- 
moria sia con l'Integer Basic sia con il monitor del- 
l'Applesoft. 

Si ottiene ciò digitando CALL—151. Dovreste ot- 
tenere un * in risposta sullo schermo. Per esem- 
pio, i primi otto byte dei dati vengono memorizzati 
scrivendo semplicemente: 


‘*1080: 11111111 -—return- 


Il numero che precede i due punti è l'indirizzo di 
partenza (esadecimale) e quelli che seguono sono 
i byte da memorizzare. 

Lo stesso programma può essere scritto in me- 
moria come un altro gruppo di dati, i codici- 
macchina e gli operandi esadecimali della ruotine. 

Se avete l’Integer Basic, però, allora potete usa- 
te il mini-assembler in dotazione col linguaggio. 

Per fare ciò, basta che scriviate: 


*F666G —return- 


Il punto esclamativo che compare sullo schermo 
è il “prompt” dell'assembler. Potete digitare ora la 
prima istruzione: 


1000:LDA $ C030 —return— 


Di nuovo, il numero che precede i due punti è 
l'indirizzo in cui va memorizzata l'istruzione. 

Le istruzioni successive possono essere inserite 
semplicemente battendo uno spazio seguito dall’i- 
struzione seguente. Mentre state scrivendo il pro- 
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Autore: Rob Hausman 
Versione italiana: Pietro Canevarolo 


Note: 


gramma premete il tasto RESET per ritornare al 
monitor e scrivete: 


*1000L —return— 


Otterrete così una lista del programma appena 
memorizzato. 

A meno che non amiate riscrivere il programma 
ogni volta, salvatelo su nastro in questa maniera: 


*1000.10FFW —return- 


Potrete in seguito caricarlo dal registratore a cas- 
sette, scrivendo: 


*1000.10FFR —return— 


Per coloro che sono in possesso di un floppy- 
driver, la procedura è la seguente: dopo aver pre- 
muto RESET per ritornare al Basic, scrivete: 


)BSAVE nnnn, A$ 1000, L$FF —return— 


dove nnnn è il nome che volete utilizzare per que- 
sto programma. 
Per caricare il programma dal disco, scrivete: 


)BRUN nnnn -return- 


con nnnn, ovviamente, uguale a quello utilizzato 
per il salvataggio. In ogni caso il programma si fa 
partire, col monitor, digitando: 


*1000G —return- 


Il programma, in effetti, è un unico ciclo. Ogni 
volta che viene eseguita la prima istruzione, viene 
inviato un impulso all’altoparlante dell'Apple sele- 
zionando l'indirizzo $C030 (hex). La seconda istru- 
zione carica il byte alla locazione $C000 (hex) nel 
registro X. 

Questa è una speciale locazione della memoria 
dell'Apple che contiene il codice dell'ultimo tasto 
che è stato premuto nei sette bit meno significativi 
e segnala, con l'ottavo bit, se il tasto è stato pre- 
muto dopo l'ultima volta che questa locazione di 
memoria è stata letta. Se il tasto è stato premuto 
questo bit è uguale a uno, altrimenti è zero. L'i- 
struzione: 


$1006 BPL $1019 


esegue un test sul bit più significativo della loca- 
zione $C000, segnalando appunto se il tasto è sta- 
to premuto di recente oppure no. 

Se la condizione appena esaminata risulta vera, 
il programma prosegue con l'istruzione di indirizzo 
$1008 che mette questo bit a zero. 

L'istruzione seguente ($100B) seleziona un dato 
dalla tabella sommando a $1000 il contenuto del 
registro X. Questo si chiama indirizzamento indi- 
cizzato, dove X è l'indice che punta al byte cercato 
nella tabella. Il dato viene poi trasferito nella loca- 
zione $1030. 

Le istruzioni di indirizzo $1011 fino a $1018 sono 
due cicli di ritardo concatenati. Consideriamo per 
primo il ciclo più interno: 


$1013 DEY 
$1014 BNE $1013 


La prima istruzione toglie 1 al registro Y. Se il 
suo valore era 0, esso diventa uguale a 255. La 
seconda istruzione del ciclo fa ritornare il pro- 
gramma a $1013 fino a che il valore di Y è diverso 
da zero. 

Il ciclo più interno consiste di tre istruzioni agli 
indirizzi $1011, $1016 e $1017. L'istruzione: 


$1011 LDX $0F 


carica il registro X con il valore 15 ($0F hex). Ciò 
significa che il registro deve essere decrementato 
15 volte prima che il ciclo esterno sia terminato e il 
programma possa continuare alla istruzione in 
$1019. 

Le restanti istruzioni creano il ritardo tra gli im- 
pulsi mandati all'altoparlante. Questo ritardo de- 
termina l'altezza della nota prodotta; più grande è 
il tempo di ritardo, più bassa è la nota. L'istruzione 


$1019 LDX $1030 


carica il registro X con il valore corrispondente alla 
nota suonata che è il numero di volte che deve 
essere eseguito il ciclo che segue nelle istruzioni 
da $101C a $1021. Il codice mnemonico NOP non 
fa compiere nessuna azione al computer e serve 
unicamente per far trascorrere un intervallo di 
tempo noto con precisione. 

L'ultima istruzione rimanda il programma all’ini- 
zio per ricominciare la routine da capo. 

Così come è l'organo usa solo i tasti della tastie- 
ra che sono indicati in figura. Se volete cambiare il 
numero di note possibili o i tasti usati, dovete 
semplicemente cambiare i valori della tabella dei 
dati. Per trovare il byte associato con un determi- 
nato tasto, sommate il codice ASCII di quel tasto a 
$1080 (hex.). Il risultato è l'indirizzo in cui dovrete 
memorizzare il valore associato alla nota corri- 
spondente. 


DI 


tasti bianchi 


1 
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Computer: Atari 


Modello: 800 


Configurazione: 16 K 


Ecco un adattamento di un popolare gioco di strate- 
gia chiamato Othello (o Reversi). In questa versione 
il giocatore si batte contro il computer e contro il 
tempo, scandito dal cronometro interno alla mac- 
china. Rispetto alla solita maniera di introdurre i dati 
(ossia le coordinate della pedina da muovere), che 
di solito faceva uso della tastiera, in questa versione 
viene usato uno dei quattro joistick dell'Atari per 
introdurre le coordinate da giocare. 

Anche la strategia, usata dal computer per valutare 
la sua posizione, è stata modificata, poiché i metodi 
tradizionali del Basic, richiedendo molti calcoli per 
prevedere le conseguenze di ogni mossa ed effet- 
tuare l'analisi di tutte le mosse possibili da una certa 
posizione, avrebbero richiesto troppo tempo ren- 
dendo il gioco troppo lento. Il programma valuta, 
invece, la sua posizione attuale sulla scacchiera in 
modo globale, anziché determinando il valore dei 
singoli pezzi. Il vantaggio è che il computer può 
scegliere la mossa da giocare in pochi secondi. D'al- 
tra parte, questa strategia non produce un gioco 
molto brillante. 


Per renderlo più interessante è stato aggiunto un 
cronometro del tempo di gioco. In questo modo, lo 
scopo non è solo battere il computer, ma riuscirci 
nel minor tempo possibile. Si possono anche orga- 
nizzare dei tornei tra amici per vedere chi è il vincito- 
re più rapido. Ma non dovete sottovalutarlo! La stra- 
tegia della macchina basta a battere severamente 
un giocatore non molto esperto. Perciò se non avete 
mai giocato prima ad Othello, dovete imparare a 
giocare e tentare poi di vincere la macchina. Anche 
dopo che la vostra esperienza sarà cresciuta, il com- 
puter vi batterà sonoramente se la vostra strategia 
si dimostra debole o se vi distraete nel corso della 
partita. 


Per usare il programma, inserite un joistick nella 
presa numero uno. | pezzi del computer sono rossi, i 
vostri sono verdi. La scelta del giocatore che muove 
per primo viene effettuata tramite sorteggio dal 
computer. Due barre alla sinistra della scacchiera 
indicano il numero relativo dei pezzi dei due gioca- 
tori. Il numero esatto di pezzi di ciascuno e il tempo 
di esecuzione del giocatore umano sono mostrati 
nella finestra inferiore del video, riservata al testo. 


100 


Autore: 


Versione italiana: Pietro Canevarolo 


Note: 


Nel gioco originale, le pedine sono dei dischetti 
bicolori: una faccia bianca e una nera. 

Il gioco consiste nel rovesciare le pedine dell'avver- 
sario circondandole con le proprie. Le pedine che 
vengono rovesciate sono quelle che si trovano com- 
prese in linea retta (orizzontale, verticale o diagona- 
le) tra la pedina che si sta giocando e le pedine dello 
stesso colore già sulla scacchiera. 

Se al proprio turno non si possono rovesciare pedi- 
ne avversarie, si perde la possibilità di giocare, e il 
gioco passa all'avversario. Vince chi, alla fine del 
gioco, ha il maggior numero di pedine del proprio 
colore. 

Per giocare al vostro turno tirate la leva del joistickin 
una delle quattro direzioni per spostare il cursore 
nero sulla casella dove volete giocare la vostra mos- 
sa e, una volta posizionato esattamente il cursore, 
premete il pulsante rosso del joistick. Se tentate di 
effettuare una mossa non ammessa per tre volte di 
seguito, il computer crederà che non abbiate mosse 
legittime a vostra disposizione e si prenderà il turno 
di gioco. Il programma non riconosce la fine del 
gioco, perciò, alla fine, premete per tre volte di se- 
guito il pulsante rosso, e il computer, rendendosi 
conto di non poter muovere, dichiarerà il vincitore. 
Buona fortuna e buon divertimento! 


bll LLLZZIIOIOLICE CI LE COLO CCSTTTT TO TrTTTÌ 


(EM + * 

EM + DITHELLU * 
4 REM * VERSIONE ATARI dE 
S REM * * 
4& REM * FERSINAL SIFTWARE * 
7 REM * * 
SNA RZZAZIO LISI OTITE TITTI TT TIE TTT I TTTITITTATTTA 


4 
1,14,12 


DUE 


200 


74 S=45:COLOR B(S):GOSUB 900:S5=54:G0SUB 900 444 PLOT VE LaYEZZIRANTO X+4,Y+2 
80 FOR Ist TD 4:FOR J=i TO s:R 

81 P(K)=X:F((4-I1)*Z0+K+10)=X:NEXT J:NEXT I 
91 DATA Brb,b6,8,2,9 

92 DATA 2,1,3:4,14,3,1,2 

93 DATA 8,23,7:5,5,7:3 
94 DATA 6&14,15:0,0,5,4,6 
289 FDKE 18,M1:FOKE 194M 
290 IF RND(0)<0,5 THEN 399 
200 5=44:0=1:NM=0 

302 POKE 18,Mi1:POKE 19M 
304 PRINT sa lo st 
305 FRINT "nella casella che desideri » 
304 FRINT "auindi premi il tasto di FUOCO" 
310 X=(S-INT(S/10)*10)*7+4:Y=INT(S/10)#5-4 
311 LOCATE XiY:l 

312 COLOR S:FLOT X+1,Y+1:DRAWTO X+4,Y+1 

313 FLOT X+1:Y+2Z:DRAWTO X+4,Y+2 

320 IF STRIG(0)=0 THEN 350 

322 T=STICK(0) 

328 IF T=15 THEN SOUND 0+RND(0)*255,10,4:G0T0 
324 COLOR C:PLOT X+1,Y+1:DRAWTD X+4,Y+1 

325 PLOT X+1,Y+2:DRAWTO X+4,Y+2 
330 IF T=7 THEN 
332 IF T=13 THEN 
3234 IF T=11 THEN 
336 IF T=14 THEN S= 
245 GOTD 310 
NM=NM+1:FO0R I=1 TO 
3 THEN COLOR 


O THEN 4460 
"NESSUNA MO 


A“ 
ND 0,15 


110,4:NEXT I:GOT0 


*DKE 20,M3 


3FOKE 20,M3 
per muovere la pedina" 


K=K+D(J 
IF B(K)<>FM THEN 808 
SM=S: RETURN 

i NEXT J:RETURN 

FOR J=1 TO 
K=K+D(J)sIF B(K 
IF B(K)<>FM THEN ; 
(K-INT(K/10)#*10)*7+4:Y=INT(K/10)*5-4 
3FLOT X+1,Y+1:DRAWTO X+4,Y+1 

FLOT X+1,Y+: RAWTO X+4,Y+Z 

IF K=S THEN &: 
N=N+1:F(N)=k Q 825 

li J:RETURN 

=03 Hs= O:C0LOR 0 

FLOT I: O:DRAWTO I 


5NEXT I 


IF B(S) 
IF_B(5) 
GOTO S90 

S41:C 


UB 9#00:G0T0 
LOR C:GOSUB 900 
200 


S >40 THEN C1=40 
367 PRINT :FRINT x 
368 PRINT "M 
COLOR 


NON CORRETTA":GOTO 3650 
B 900 


UND 0,Hs*6,1914 
)=FM:NEXT k FLOT 4,40-Hi :FLOT 
COLOR FM S:RETURN 


FDR I=i TO 


i 2 —INT(S/10)*10)*7+4:Y=INT(5/10)*S 
SOUND O,1,10, 


IsY TO ve 


)/4&0)sM=INT 


0)*40 
FRINT »+ "Min "sM, 
4 THEN ? :RETU 
9 TO S99:NEXT I 
970 FRINT :FRINT “FINE GIU 
971 FRINT :FRINT “"FREMI Fl 
ND 0,RNI *100,10,4 
THEN RUN 


LOR 1: PLOT XE LI VAL: DRAW 
DRAWTO X+4,Y 


PER CONTINUARE" 


0.5 THEN 


FOR I=1 TO 700:NEXT I:G0T0 


Se avete convertito uno dei nostri programmi per il vostro computer, 
spediteci il listato, una paginetta di spiegazioni e un supporto magneti- 
co (disco o cassetta) con la registrazione del programma. 

Vi restituiremo tre supporti magnetici e pubblicheremo la vostra ver- 


sione. 
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Boing 


Computer: Atari 


Modello: 800 


Configurazione: 16 K 


Autore: 


Versione italiana: Pietro Canevarolo 


Note: 


In questo gioco dovrete preoccuparvi della salute di 
un trampolinista un po’ troppo esuberante! E il fa- 
moso rimbalzatore Bonzo. 

Bonzo non rimbalza come le persone normali, per- 
ché le persone normali cercano di restare sul tram- 
polino, mentre a Bonzo piace saltare in giro per tutta 
la palestra. Può rimbalzare sui muri senza nessun 
problema, ma sembra non rendersi conto che rim- 
balzare sul pavimento può essere pericoloso! 

Il vostro impegno, dunque, è seguire Bonzo nelle 
sue giravolte con il trampolino, facendo in modo 
che non cada. 


1 BEM PB A AA OA A A 
* 


< REM » 


3 REM * * 
REM * VER: * 
S REM » * 
& REM * FERZINAL FTWARE hi 
REM * * 
REM FIBRA OA IAA 


DIM E$( 


FOR I=1 TO 1 
10 NEXT I APFHICS 0:FOFE 
15 FRINT **BUOING'x*x%* 
20 FRINT "Non far cadere BONZO rimb 
FRINT "A BINZO piace rimbalzare, ma ha" 
FRINT “problemi a centrare 11 trampolino." 
FRINT "lisa 11 Joystick per spostarglielo." 
FRINT "Se colpisce la parte sinistra del" 
FRINT "trampolino rimbalza verso destra e" 
FRINT "viceversa. Uyesto influisce sui" 
FRINT "rimbalzi di BONZIO sempre PIL 
FRINT "aumentando livello di difficolta’ 
FRINT "e diventa sempre piu’ difficile” 
FRINT "mantenerlo in aria. Vediamo quante" 
FRINT "volte riesci a far saltare ECNZO," 
FRINT :FRINT " 4*%* BUONA FORTLINA! x** 
100 FRINT "“ (EONZO ne ha bisoano')" 

105 FRINT 

DFEN #1,4,0,"k" 

FRINT "Livello 


26 (I)=CHR&(X) 
ON 2,1 


i: difficolta” (9=9)2 #3 


FLOT I, 
140 DRAWTO 
162 FLOT I 
170 E=1,5: 


Sono previsti dieci livelli di difficoltà, da zero a nove, 
che dipendono da quanto esuberante si sente Bon- 
zo in quel momento. 


Ma, attenzione! Il livello nero è così facile, che potre- 
ste essere tentati di passare direttamente al livello 
nove. Non fatelo! Il livello nove è per persone che 
non hanno molto a cuore la salute del nostro pazzo 
Bonzo. Provate i livelli cominciando dal primo, cer- 
cando di controllare perfettamente il livello inferiore 
prima di passare al successivo. 


Questa sarà tutta salute, per Bonzo! 


OR I=15 TO = 
KE 457,X:FRINT 
FOR J=1 TO 10:NEXT J:NEXT I: 
FOKE 457,16&:FRINT CHR$(11); 
KE 657, 164:FRINT " 
FLOT X;E 


:3IFV 


O THEN v=0 


BOING! "5:60T0 250 


FLOT 


INT(A) + INT(E):A=A-L:E=B-D 


400 
E 400 
=E-RND(0)-1:L 


UE 400 


V=14:LEFT=F4+F 

INT(A) 5LEFT AND INT(A) LEFT+14 THEN 210 
FRINT 

FRINT »"SFLAT'",C0LNT;" 
IF COUNT>1 THEN FRINT "1 
UNT=1 THEN FRINT "o" 
FLOT INTCA). INTE) 
4 T0 0 STEF -0.1 MUNDO Oy vl2rViNEXT V 
"Il livello di difficolta’ era ";m 


Îststa 


S THEN 
UNT+1:E NDCO)/2 
EFT+RNI(0))*H/4 

OT INT(A) INTE) 
13,13,13,13, 


‘ Baseball 


Computer: Atari 


Modello: 800 


Configurazione: 16 K 


Siamo in autunno. Siamo, cioè, nel bel mezzo dei 
vari campionati di calcio, pallacanestro, pallavolo, e 
altri sport. In America, siamo in pieno campionato di 
baseball, il loro sport nazionale che sta incontrando 
sempre maggior favore anche da noi. 

Qui, a Personal Software, siamo in situazione di 
stallo nel nostro personale campionato di baseball 
tra colleghi di lavoro. 

Ovviamente, vista la scarsità di spazi adatti al gioco 
vero e proprio e vista anche la nostra totale ignoran- 
za del gioco, il nostro è un campionato computeriz- 
zato (occorreva dirlo?). 

Il gioco originariamente è stato scritto per il TRS-80, 
e successivamente adattato all’Atari. Questa versio- 
ne richiede l'uso dei joistick numero due e tre. Lo 
scopo è ovviamente segnare più punti possibili al- 
l'avversario. Il gioco si svolge tra due giocatori (che 
controllano le due squadre): i Rossi e i Blu. Per 
iniziare, dopo aver battuto il programma (e averne 
fatta una copia di emergenza), occorre connettere i 
due joistick e lanciare il programma. 

Lo schermo vi informerà sulla squadra alla battuta. 
La squadra che gioca in ricezione deve, naturalmen- 
te, ribattere la palla e correre per il campo per pren- 
dere la pallina prima che tocchi terra. 

Per lanciare bisogna premere il pulsante di fuoco, 
oppure spostare la leva del joistick. A seconda della 
direzione scelta con il joistick, la palla volerà con 
diverse traiettorie e con vari effetti. Comunque la 
pratica è la miglior descrizione. Tirando la leva ver- 


MUNE ZZZ TETTE TE CT CC COCCOCECCGLERO Lc LL 
REM * * 
REM 3 
4 REM 
s REM 
& REM LI 
7 REM * Ù 
CRINAUBEZZETIT CITE TT CE CECCO LE LE GAL i LAI 
DIM A$(7) (18) ,N(47):1 î 
DIM AS(7), 
FOR I=1 TO 1 
FOR TO 4 
DATA 167,34,41,4k6,54,4£ sb 
DATA 47,47,34,41144,54,44&4 146186 
DATA 41,41:41,54,51,44,41:41,S1:61,61,61 
g DATA 41,41,41,41 1Abib1,61 1 
100 IF ) 
115 B=2 
120 F=0 


KA 


iN(47)? 
(I)=0:NEXT 
EAD X:NCI)= 


THEN B=1:R 


0:J=0:k=0:L=0 


Autore: 


Versione italiana: Pietro Canevarolo 


Note: 


so di sé si ottiene una palla diritta e veloce, mentre 
spingendola verso l'esterno la palla sarà più lenta e 
più ad effetto. Per colpire la palla si utilizza ancora la 
leva (dell'altro joistick, ovviamente). Anche qui, a 
seconda di come si muove la leva, si ottengono 
effetti vari: dal tiro diritto, fino al classico tiro “a 
campanile”. 


Una volta colpita la palla, viene il turno della corsa. 
Un giocatore della squadra del lanciatore deve par- 
tire di corsa per prendere la palla al volo, mentre il 
battitore corre intorno al campo per conquistare le 
varie basi. Quando la palla è stata raccolta, essa 
viene tirata verso i compagni di squadra che difen- 
dono le basi. Se il giocatore che difende una base 
riceve la palla prima che il battitore avversario sia 
arrivato a toccare la base, questo deve tornare indie- 
tro alla base precedente. Quando il giocatore che 
deve prendere la palla al volo è sullo schermo, dove- 
te attendere che smetta di lampeggiare e premere il 
pulsante di fuoco. Il giocatore farà un incredibile 
salto e... tenterà di prendere la palla. Se la palla è 
troppo lunga, premete il pulsante finché il giocatore 
corre per farlo “lanciare” sulla palla. Sembra sem- 
plice, vero? 

Il computer tiene conto del punteggio e mostra an- 
che alcuni dati statistici mumero di battute, numero 
di errori, percentuale di errori) al termine di ogni 
inning. 


Buon divertimento. 


OR I=i TO 100 


IF H30 AND H5 THEN BH=BH+1 
THEN RE=RE+1:EH=BH-1 


? THEN RA=RA+1 
H250 AND Hx5 THEN RH=RH+1 


SZ, 1 
05 ALLETAR BASEBALL " 
407 FRINT 


FRINT 


SINNING":FRINT 
5PRINT " ROSSI “:PRINT 
TO 9:POSITION Ix3+9, 
5FOR Isl TO IN 
NT(I/2) THEN 450 
5FOSITION (I/2)*3+10,7 
GOTO 440 
OSITION 


RINT * BLU 
RINT Is:NEXT I 


(I/2)*3+9,9 


450 FOSITION 1,14 

451 PRINT “Funti: Funti Battute Errori Batt.%" 
452 FOSITION 2,164 

454 PRINT " Rossi ITION FRINT " AalL: de 


POSITION 13, 14:FRINT RS 
PRINT RH:FOSITION 26,1 


i» 1&:FRINT PE 
ITION 19,18 
RINT BE 


DSITION 
IF BA=0 THEN 479 


z4b,1 


FE=INT(BH/BA*1000):FOSITION S:PRINT FE 
FOSITION 0,23 

? PRINT "Premi il pulsant er continuare ii 
IF_STRIG OR STRIG( O THEN GOTO 4 


GUSUB 250:G0T 
SOUND 1,0,0,0:IN=IN+1 
IF IN=19 THEN 451 


IF_IN=1£ AND BS>RS THEN 491 
GOTD 100 

FRINT 
IF 


pulsante per giocare ancora"; 
O THEN RUN 


"Fremi il 
RII 


UB D 492 
IF Hi1 OR H>4 THEN RETURN 

FOR I=1 TO Ha TCOLOR 4,RND(0)*14&, 13 
SOUND 0,100,8, FOR II=1 TO 100:NEXT II 
NEXT I 

& GOTO H*10+400 


1 THEN 
: F=P+1:RETLIRN 
FOR Is1 TO 


654 THEN L= 

so5 F=F+1:RETLRN 

550 PRINT * DUTI TEOLOR 4,6 QUND 0.100,64 
661 FOR I=1 T EN ae Tasso i 

62 IF JZ0 OR OT>I OR AND(0)<O.S THEN RETURN 
663 FI BATTUTA DOFFIA! 010,8 
564 FOR I=1 TO 250 

bl 

bb 

£70 DT=0T+1:IF K 

572 IF L=0 AND 

674 


UNI 0,100,6,8 
ENTI 
IR RND(O)< 


OR L= 
FRINT " RINUNI 
SETCOLOR 4,11 
FOR I=t TO 
5E Fa =F+1 


0.4 THEN RETURN 
Ù dar 


2 IF RND(0)< 0. 5 THEN 750. 
FRINT " BATTUTA INTERNA! 
SETCOLOR 4,1,10 
X=INT(RND(0)* 
A=RND(0)#40+2 


"3PRINT 


703 


104 


9 E=-(RND(0)+2) 
COLOR O:G0SUB 980 
Z2 IFSTICK(B)>4 ANDST 
IF STICK(B)>8 ANDSTI 
IF X<2 THEN X=2 


IF SIE THEN X=74 
COLOR 3S:G0SUB #50 
IF A<3 OR A>74 THEN 745 


LOCATE A,D-1,Z:IF Z=3 THEN GOTO 640 
COLOR 0:FLOT A,D 
A=A+C:I=0+E:COLOR 1:FLOT A,D 

IF D<23 THEN GOTO 740 

SOUND 0,0*5,10,5:IF DV>0 THEN 728 
GOTO 720 

IF ABS(X-A)>9 THEN GOTO 747 

2 IF RND(0)<0.5 AND A X+1-A)<5 THEN 
FRINT " SINGOLA OTO 400 
PRINT " DOPFIA OTO 400 
NT(RND(0)*= 
PRINT " BATTU 


3000 


A+#D374 
ATE ArD+1,2 
Z PRINT 


3 THEN 774 
QUND 0,40,14, 10:G0T0 


LOT A\D 
IF DV:0 THEN GOTO 747 


OTO 400 


EN GOra 


var 
78 


STRIKES " 


:FRINT 


OT Ir, 
1,Z-1:Z=2.1 
Z4:FLOT In 
IRAWTO I, Z-1 


NEXT I 


Z+1:NEXT I 


+INT(RND(0)*4) 0 
THEN A$="ELL" 
"saggi 


ATE XiY,Z3IF Z=2 THEN 
TE XiV41,Z:IF Z 
TE XiV+Z,Z3IF 2=> 
O COLOR 1:FLUT X 


UR X541) 
4,8,10 
DR Isl TO 


THEN 4000 


7 1F BL=d THEN 


ILOR =:X=X-RND(0)*9:IF X<1 THEN X=1 
OT XIY+1:FLOT X+1,Y+Z5DRAWTO X+1,Y+4 
A :9 Y+4:FLOT X+4,Y+4:RETLRN 

X X+RND(0}#9: IF X370 THEN X=70 
To. FILO 


TO 


IF RND( 
14114 

OR O:FLOT XiY:X=X+D:Y=Y-1 
îF Sy 1 THEN 700 
ROL:PLOT XiY 


ND O1X+2 bia: 
7 
DRAWTE 41 


E 
PRINT" 
DUND 0,150,10,4% 
YaYy- 
IF X54 


FOR I=1 TO 10:NEXT I 

NT=NT+1:IF NT>47 THEN NT=1 
RETURN 

FLOT X+1:Y:FLOT XiY+1 

DRAWTO X+ZrY+1:FLOT X+1:Y+2 
FLOT Krv+ LOT XiY+4 

LOT X+ziV44: RETURN 


PLOT B1+B2+15FLOT Bl+1,B2+1:RETURN 


N 


well] 
i Mi 
7 
© SINCLAIR © VIC © APPLE 


IL PIU' PICCOLO IL PIU’ PICCOLO ESPANDIBILE IL PIU' FAMOSO 


Ra 


® ATARI ® TEXAS ® SANCO IBEX 
IL PIU' GIOCATO IL PIU' ATTESO IL PIU' COMPLETO 
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Supercaccia 


Computer: Commodore 
Modello: VIC 20 


Configurazione: 3 K 


Autore: Pietro Canevarolo 


Note: 


Supercaccia è un rifacimento per il VIC-20 Com- 
modore di un gioco molto diffuso nei bar e nelle 
sale giochi. Il vostro compito è mangiare i tesori 
che appaiono in un labirinto prima che il mostro 
mangi voi. Sembra semplice, vero? Be', non è pro- 
prio così facile come sembra. Più veloci siete, 
maggiore sarà anche la velocità con cui si muove 
il mostro. A che scopo, allora, correre velocemen- 
te? Il fatto è che più velocemente vi spostate, mag- 
giore è il punteggio per ogni tesoro catturato. 

Ecco come funziona il gioco. Per prima cosa do- 
vete scegliere il livello di difficoltà. | livelli disponi- 
bili sono nove, da 1 a 9. Dopo che avrete effettuato 
la vostra scelta, il programma disegna il labirinto. 
Finita anche questa operazione, vengono sistemati 
i tesori che dovrete mangiare e il simbolo che vi 
rappresenta appare nell'angolo a sinistra in alto 
dello schermo. A questo punto potete partire. 

Se riuscite a ripulire tutto il labirinto dai tesori, 


PARLI IRE AFARTIA RE FRA RR AIA DIAIITAAIATAAAHA 
* 


SIPECCACCIA 
VERSIONE HIC-20 


doi 


* 
billo i LE CITTITTT TTI TETTI TIT LI TITTI TTI Tti11 
SURL4GEO 
2 POFEI.O POM 
45 GOSUBIZANA 
190 GOTRIARAR 
IN0O Messo 
1116 POKEDD. 127 PI=PEEKCDI>ANDAD P2=PEEKCD2) 
IFP1 5 SQTHEHI130 
= 'PRINTME, 4=v-1 
CH=2 CW=1 GOTOI168 
>119THEH1140 


* 
* 
* 
FERSONAL SOFTWARE * 
* 
e 


a 
P_SK=PEEKC0) P=PEEKC1)X256+PEEK(2) 


C3SATHENI 155 
s2 Mt="+MD0" PRINTM$; v=W+1 

1154 C8="9" Cw=-1 CY=A GOTOIIGA 
1ISS GOTOI29G 
1160 IFFNCHéS 


>ULTHENI 170 


vi viene assegnato un premio, che dipende dal li- 
vello di difficoltà che avete scelto in precedenza, 
poi viene disegnato un altro labirinto e il gioco ri- 
comincia con un livello di difficoltà superiore a 
quello precedente. Non preoccupatevi se non riu- 
scite a ottenere un punteggio molto alto alle prime 
partite. Di solito si impara abbastanza in fretta. 


Il mostro seguirà il vostro percorso passo per 
passo, così potete nascondervi in un corridoio la- 
terale del labirinto e lasciare che vada avanti se vi 
ricordate la strada che avete percorso. Se vi trova- 
te in trappola, cercate di farlo accelerare. Mentre il 
mostro sta accelerando, voi potete correre e sor- 
passarlo. Per ottenere questo effetto, dovete muo- 
vervi avanti e indietro più in fretta che potete. 


Alla fine, se il mostro vi ha catturato, appare il 
punteggio e il tempo che siete riusciti a sopravvi- 
vere. 


1152 PRINTCE, :M=X+0M P=t/+CY GOT01300 
1179 F$=F$+RIGHT: $. 1) 
IFFNCH€S>=DITHENP=P+100%C(EL-S) :PC=PC+1 


IFFNCH(S)=SPTHENP=P+59#CEL-S) PO=PC+1 
IFFHCH(S)=CLTHENP=P+9Q#(EL-S) :PO=PC+1 
& IFFNCH(S)=HETHENP=P+20%CEL-5) :PE=PC+1 


IFFHCHCSI=CITHENP=P+{9W(EL-S) PO=PC+1 
T8=STR$CPWSK) FORI=ITOLENCI$) 


1270 POKESC+J+499, ASCC(MID$(I%,J.1)):NEXT 
1300 PRINT'e@ll'; 

1310 IFPC<CG1THEN1900 

1312 PRINTDN£"IL TESORO NON CE": :G0T07000 
1900 RETLIEN 

2006 IFLENCF£>>=3Q@THENGOSUR300A 

2005 FM=FM+1:1FFM/SC>INTCFM/S5THEMRETLIPN 
2006 FORH=1TASKL 


POKEFNPLOTCA).32 
I$=LEFT$(F%.15:F$=MID$(F$,2) 
POKEV, 15 POKESI . 254-LEM(F$) 
A FORM=1T010:NEXT POKE36975,2 
id IFI$="3"THENYF=WF-1 GOTN2200 
A IFJ#="hl"THEHXF=XF+1 GOTN2200 
A IFIs="u"THENYF=YF+1 GOTO2200 
A 
a] 
Ji) 


Na RI TO ra RO RM 


IFI$="II"THENXF=XF-1GOTI2200 
GATN222A 

POKEFHPLCRI, 42 

MEST 

RETURN 


POKEFNPL (9). 32 

S=S-1:IFSC1THENS=1 

TR${EL-S) :FORJ=1TOLENCJ$5 

A 0 J CCMID$CI$, JT. 15) :NEXT 
18 FORC ITO18:J8 ID$(F$. 0.1) 

15 IF1$="9"THENYF=#F-1:GOTNIIAA 
(“] 
(n) 


IFIs="W"THENYF=?F+1 GNTOZIAA 
IF.1$="NI"WTHENZF=NF+1:GOT03100 


A IFIs="II"THENXF=xF-1:GOT03100 
î POKEFNPLCQ), 42 

A IFC/SK INTECA Ko 

a 


FORN=1T01G HE 
POKEFHPLOT(0).32 

NENT 

II:8(F$.EL> RETLIFH 

FOR VETHEMA SAR 
PRINTINS'OTTIMO BOCCONE!" GOSLIREA 
RETURN 

A POKE36877. 220: FOPL= 1ETNOSTEP-! Fi kE 


AIA :GOTOLIAER 


n 


n POKEI. TRO 
1)+1:POKEG. SE 


SK=PEEK 
GNTO7ARA 

FORM=1T0508: GOSUBIAAA IFLEN€F£5 
A FORI=S142T0S1 : 
A GOSURIAGA: GUSURZaNRE :G 
} TITTI 


PARTI! > 


2 PRINTONE" mVELOC:A 1a" 


A PRINTDNS"BMMPLINTI (A 


109800 
10990 
11000 
11018 
11105 
11107 
iiiia 
11120 
11130 
11140 
11150 
12000 
12005 
12018 
121090 
12110 


12200 | 


12205 
12210 
12220 
12240 
12250 
12300 
12305 

12318 
12329 
12325 


PRINT"2@[d"; :H=1 1:VF=1 
GOTNZaDA 

REM FINE GINCO 

POKE37154. 255 

PRINT:PRINT"MTEMPO "iMIN$TI$,3.2) 
PRINT" MI E ":RIGHT&(TI$,2);" SEC" 
PRINT"ANCORA? $Ill"; 
GETJ$:IF.J$=""THEN11120 
PRINTJ$:IF.1$="N"THENEND 
IFJ$="S"THENRUN 
PRINT:PRINT"79";:GOTOIIIIO 

DIMAC(3) :A(0)=2:RC13=-44:AC2) 
UL=1@2:HL=32:SC=7680:A=Si 
POKE36879, 111 

PRINT TE FIRE ele 


i=1:xF= 


FORI=1T021 


B=R+ACJ) 

IFPEEK CB) <>4WILTHEN12240 
POKEB, J:POKER+AC(1)/2.HL 
J=(J+1)%-(1C33:IFJ ba] 
J=PEEK (A) : POKER, HL: IFJCATHENA=A-ACT) :GOTO12200 
PRINT "20MIx 

READI.K.C:IFICATHENI 2500 

FORA=1TNI 

B=INTCRNIC1)#410) 
IF(B-21)222=INT((B-21)//22)THEN12320 
IFPEEKB+77@2)<>32THEN12320 

POKER+7702 KEB+38422, C 

NEXT :GOTO 
DATA2.90.1.4 
PRINT"12450: 
RETLIPN 


1A=B:GOTNI2ZZa! 


A POKE36879.d6 
A PRINTCHR£i14)" TIM IT 
A PRINT "MCDDI 


dellPERCACCIA®" 
TONY | ODSHALL" 


PRINT"MM ABILITA" “1-95: di mupi, 
GETIS:IFI: "THEHI4Q 
si da I$): IFSKE<1ORSK59THENI 4060 


ASK 


PRaNTAI POKEA SK: FOPN=! TOSIAG.NEST RETI 


Il piacere del computer è /a prima collana inte- 
ramente dedicata alle applicazioni hobbystiche 
e professionali del personal computer. Questi 
libri descrivono l'hardware e il software, inse- 
gnano la programmazione in vari linguaggi, of- 
frono molteplici applicazioni e informazioni pra- 
tiche. Per conoscere gli altri titoli finora ap- 
parsi (relativi al PET/CBM, all'Apple, al Basic 
al Pascal, al TRS-80 e ad altri argomenti) chie- 
dete il catalogo generale a 


franco muzzio & c. editore 
via bonporti 36 - 35141 padova 


pagherò al postino il prezzo indicato più lire 


PS3 
© ®© © © © © ®© ®© © © © © ®© ®© © 


Tira e molla 


Computer: Sinclair 


Modello: ZX 81 


Configurazione: 16 K 


Lo scopo del gioco è di far atterrare una nave 
spaziale sopra una piattaforma, usando i tasti 5 e 8 
per spostarsi lateralmente e il tasto 7 per mante- 
nersi in aria. 

La piattaforma è disegnata utilizzando il tasto 
SHIFT-H dopo aver premuto GRAPHICS, ossia 
SHIFT-9. Il punteggio viene visualizzato sotto alla 
piattaforma. Ovviamente se state sospesi in aria 
consumate carburante e, all'esaurimento di que- 
sto, perdete il controllo dell'astronave. Ciò avviene 
anche se mancate il bersaglio. Il gioco ricomincia 
premendo lo zero dopo che sarà apparso il pun- 
teggio. 

L'animazione grafica viene effettuata sovrappo- 
nendo rapidamente la stampa dell'astronave nella 
posizione attuale alla vecchia posizione. Il messag- 
gio di PERICOLO lampeggiante e della quantità di 
carburante utilizza la stessa tecnica. 

Per aumentare la difficoltà del gioco, provate la 
seguente modifica: 


520 LET X=INT (RND*5)+6 


Provate anche altri valori per le due costanti e 
fateci sapere come funziona il gioco. 

Il programma occupa circa 4K di memoria e, 
quindi, non gira su macchine non espanse. 

Il carattere grafico nella riga 300 è una S inversa 
mentre alla riga 530 viene utilizzato il carattere 
SHIFT-H. 
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Autore: Max Huber 
Versione italiana: Pietro Canevarolo 


Note: 


1 REM TIRA E MOLLA 

3 LET sSCc=@® 

4 LET S=20 
209 GOSUR Sma 
15 PRINT AT @,8, "CARBURANTE ="; 


sc 


vi 


17 PRINT 
20 PRINT 
398 PRINT 
40 IF IMNKEY $="5*% 


59 IF INKEY$="&" THEN LET %=%+ 


60 IF INKEY&="77 cora 
X<=-1 THEN = 
se X,=23 FHEN 
90 LET Y=Y+1 
160 IF Y=17 THEN GOTO 400 
118 GO0TO 28 
399 PRINT AT_Y+r2,X;" Bo ” 
318 LET S=5-2 
359 IF s=-2 THEN GOTO 7022 
3309 G0T0_ 15 
IF_NOT tx=1 OR X=12 OR «x=27 
®Y THEN GcOoTO 702 
410 IF X=1 THEN LET SC=Sc+228 
420 IF X=13 THEN LET SC=Sc+198 
430 IF X=27 THEN LET SC=SC+15® 
440 PRINT AT_19,10; "BEN FATTO” 
450 PAUSE 120 
+59 CLS 
479 GOTO 19 
599 PRINT AT 21,82 


519 LET X=INT (IRND» D+ 
529 LET Y=INT_ (RND=51)+2 
538 _PRINT AT DE 


548 PRINT AT 
55® PRINT RAT 


569 RETURM 
7@9 PRINT AT 
719 PRINT AT 
#29 LET Y=Y+1 
73@® IF Y=21 THEN cord ams 

m749 PRINT AT 10,10; RESSE 


752 FOR N=1 TO 12 
769 NEXT _N 
72 PRINT AT 10,10; 


789 GOTO 799 
398 Skînr 

AT 10,8; "MIS 
BI. fio SIONE FAL 
815 PRINT AT 
820 FOR N=1 TO 
830 NEXT N 
84@ IF_ INKEY$="9" THEN GOTTO Qe 
858 GOTO 399 


ama 


u=23 


2,18; "PUNTI="; SC 
ia 


Trappola 


Sinclair ZX 81 
Configurazione: 1 K 


Computer: 


Autore: Max Huber 


Versione italiana: Pietro Canevarolo 


Sinclair ZX 81 
Configurazione: 1 K 


Computer: 


Autore: Max Huber 


Versione italiana: Pietro Canevarolo 


Un ragazzo di 14 anni ha inventato questo gioco 
per ZX81 (o ZX80 con ROM nuova da 8K) e 1K di 
RAM. 

Il computer visualizza sullo schermo un asteri- 
sco (*), che potete spostare con i tasti a freccia, 
ossia 5, 6, 7 e 8, attraverso tutto lo schermo. Men- 
tre voi vi muovete il computer cerca di intrappolar- 
vi costruendo dei muri che sbarrano il vostro per- 
corso utilizzando lo spazio inverso. (Per chi non lo 
sapesse ricordiamo che lo spazio inverso si ottiene 
premendo GRAPHICS, ossia SHIFT-9, e poi lo SPA- 
CE.) Voi dovete cercare di non farvi imprigionare 
dal computer e di non urtare i muri. | muri diven- 
gono un labirinto nel corso del gioco e il punteg- 
gio vi viene mostrato al momento dell'urto con un 
muro. 

Qualche volta, se il programma viene fatto gira- 
re su macchine con solo 1K di memoria, il gioco si 
ferma e appare il messaggio 5/XXX, XXX è il nu- 
mero di una riga, che significa che non c'è più po- 
sto disponibile sullo schermo. Il gioco riprende 


con il punteggio inalterato premendo il tasto 
CONT. 

S REM #44 TRAPPOLA 334 

7 CLas 

d LET 

:@ LE 

s7) 

a 25 A 


(RNDI3-1) 
(RNDAR-13 
SQ IF C-A AND D-8S_THEN GOTD 72 
A PRINT PIT C,2) =. 


120 PRINT AT A/8; 
i IF . 


132 INKEY$="' ten cer 8=8- 
140 IF INKEV$="2" THEN LET B=B+ 
Di 

159 IF INKEY$="S5" THEN LET A=P+ 
“160 IF IMKEY$="7" THEN LET R=A- 
1 

172 PRINT AT A_2; DI 

180_IF PEER (PÉER I153D23PEEE 18 
a9o3#258) cina THEN coTO DIN 

190 IF INKEY$:0"" THEN LET S=5> 
“aR@ GOTO «® IARESTERIE 
219 PRINT AT_18,1;"(";5,%2 
222 FOR Isa TO 20m 
2329 NEXT I 

240 RUN 


Il programma è stato concepito per girare sullo 
ZX81 con 1K di memoria e stampante ZX, oppure 
sullo ZX80 con ROM nuova da 8K e stampante. 

Dopo che avrete dato il RUN, il computer vi 
chiederà di indicargli la larghezza che desiderate 
abbia lo stemma. Il numero che dovete battere de- 
va essere scelto tra 1, 2, 3 e 4. Più piccolo è il 
numero, più piccolo risulterà lo stemma disegnato 
sulla stampante. In seguito il computer chiederà il 
messaggio che desiderate appaia sullo stemma e, 
infine, lo stamperà. 

Una versione migliorata del programma si ottie- 
ne con le seguenti modifiche: 


5 INPUTW 
170 FOR X=1T0W 


In questo caso il computer vi chiede per prima la 
larghezza, un numero da 1 a 9, poi l'altezza, da 1 a 
4, e, infine, il messaggio dello stemma. 


10 INPUT S 
20 INPUT B$ 
Sa DIM 


AG) 


La A; 
THEN FUN 
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Pianeta X 


Computer: Sinclair ZX 81 


Configurazione: 1 K 
Autore : Max Huber 


Versione italiana: Pietro Canevarolo 


Siete seduti al posto di guida di un'astronave (£) 
che entra ed esce da vallate e crateri, sorvola mon- 
tagne e pianure, alla ricerca di minerali preziosi. Il 
computer di bordo effettua la ricerca e l’analisi au- 
tomatica dei campioni di minerale sulla superficie 
del pianeta e il vostro compito si limita a mantene- 
re l'astronave in volo più vicina possibile al suolo 
senza schiantarsi addosso a qualche rilievo del ter- 
reno. 

Premendo il tasto 5 l'astronave si sposta verso 
sinistra, mentre con l’8 vi dirigete a destra. Atten- 
zione, però! Più alto è il vostro punteggio, più len- 
ta è l'azione dei razzi di direzione dell'astronave. 
Otterrete il punteggio più alto volando più rasente 
possibile al suolo. Questo vi verrà mostrato solo al 
momento dell'impatto col pianeta. Prima di inizia- 
re a volare, dovete descrivere al computer la natu- 
ra della superficie del pianeta, ossia dovete rispon- 
dere alla domanda del computer con un carattere 
che verrà utilizzato dal programma per disegnare 
il profilo orografico del pianeta. 


PEINT FEE WaPg e 


ROLL 


IF Ibinevg=" THEN LET P=P+t 


5 
2995 5 
. SO IF INNEv&="5" THEN LET PaP- 
200 PRINT AT U.E,. 
105 LET S=5S+50-P 
110 LET x=%+E-T 
115_ IF PEEL (IREE* 16595+256 +PEE 
Ft 15399) =CO0E A$ THEN GOTO 1000 
117 PRINT “e 
120 GOTO 40 
1009 PRINT AT D.P: £rrer". INT LE 
I 


IR) 


Servizio programmi 


Per alcuni programmi (i più 
vasti e impegnativi) Personal 
Software mette a disposizione 

dischi e nastri già registrati. 
Questo mese sono disponibili: 


N.1 Applell (L. 30.000) 
Contenente 


La carta del cielo 
Collisione 


N.2 TRS-80 (L. 25.000) 


Contenente 
Backgammon 


N.3 PET/CBM (L. 40.000) 
Contenente 
Editor/Assembler Basic 
(Personal Software 
n° 2/1982 pag. 33) 


Potete riceverli contrassegno, 
ritagliando e spedendo questa 
cedola 


ee SE e 


Indirizzare in busta chiusa a 

PERSONAL SOFTWARE | 
Via Rosellini 12 

20124 MILANO | 
Cognome e nome | 


Indirizzo I 
Cap. località = | 
Inviatemi il disco N con i program- 
mi pubblicati nel numero 3 di Personal 
Software | 
Paghero al postino lire 


L Firma = | 


Posta 


Inizia con questo numero la 
rubrica della posta. Abbiamo ri- 
cevuto molte lettere: non moltis- 
sime, ma abbastanza per impe- 
gnarci diversi giorni nella lettura 
(non solo dei testi, ma spesso 
anche dei programmi contenuti) 
e per “studiare” una risposta ai 
quesiti tecnici. Qui rispondiamo 
alle lettere di carattere generale. 
Nelle varie rubriche rispondia- 
mo ai quesiti relativi appunto al- 
le rubriche. 

Continuate a scriverci. Il no- 
stro indirizzo è 


PERSONAL SOFTWARE 
Via Rosellini 12 
20124 MILANO 


Tanti auguri 


Spett. redazione, 

dopo aver letto con piacere il primo 
numero di Personal Software, ho deci- 
so di scrivervi per farvi i miei compli- 
menti. A mio parere la vostra iniziati- 
va desterà senz'altro l’attenzione che si 
merita, mancando finora in Italia un 
mezzo che svolga il compito di 
“educazione al software”. L’argomen- 
to, infatti, è importantissimo per colo- 
ro che, dopo aver acquistato un perso- 
nal computer, sentono la necessità di 
metterci dentro qualcosa di proprio, di 
originale, di diverso insomma dal pro- 
gramma che chiunque può acquistare. 
In altre parole, Personal Software mi 
sembra la rivista adatta per chi, invece 
di comprare, desideri creare. 

Di conseguenza ho apprezzato mol- 
to la scelta del materiale presentato, 
che è stato attinto dalle più autorevoli 
fonti d’oltreoceano nel campo 
dell’“educazione al software”, ed ap- 
prezzo ancor più decisamente l’impo- 
stazione della rivista. Trovo infatti che 
pubblicando articoli del tipo “come si 
fa” insieme ad altri di tipo “io ho fatto 
così”, avete realizzato la raccomanda- 
zione di un saggio proverbio (si dice 
sia cinese) che dice pressapoco: “se re- 


gali un pesce ad un uomo che ha fame, 
lo sfamerai per un giorno; se gli inse- 
gni a pescare l’avrai sfamato per tutta 
la vita”. a 

Spero perciò che la vostra rivista 
serva a favorire, qui da noi, la compar- 
sa di programmatori creativi come è 
già successo in America, dove da anni 
alcune testate educano al software le 
fertili menti dei lettori. 

Augurandovi una felice prosecuzio- 
ne su questa strada, che in Italia è an- 
cora tutta da percorrere, vi faccio una 
sola raccomandazione: quella di non 
diminuire il livello della sezione 
“articoli”. Questo succederebbe pub- 
blicando assieme al materiale tradotto 
qualcosa che, pur essendo meritevole 
perché italiano, risulti poi deplorevole 


perché “all'italiana”. . 
Marco Morocutti 


EC Elettronica, Brescia 


Ringraziamo dei complimenti. Le 
sue parole esprimono esattamente le 
nostre convinzioni nel fare questa rivi- 
sta. 


I trucchi e le utility 


Caro Direttore, 
ho letto con molto piacere la sua 
nuova rivista; era ora che qualcuno sì 
decidesse a compiere questo passo. _ 
Sono un hobbysta in possesso di 
TRS-80 mod. 1 — 16 K cui, dopo un 
anno (e molti ripensamenti...) ho ag- 
giunto una stampante, ed ora sto pen- 
sando ad un floppy... 
Trascorro con il computer parte del 
mio tempo libero e cerco di farci un 
po’ di tutto (al momento sostituisce la 
macchina da scrivere, ma senza word 
processor è un po dura...). } 
Inoltre comincio a documentarmi € 
tentare qualche esperimento con Inter- 
facce ed attuatori con il “mondo 
esterno”. | 
Ritengo che molti, come me, siano 
ormai ben stufi di leggere di prezzi, di 
beghe tra importatori e della macchina 
appena uscita migliore di tutte (anche 
di quella del giorno precedente). 


Abbiamo voglia di farle camminare 
queste macchine e, se ci si guarda un 
po’ in giro, avventurieri a parte, non si 
sente parlare d'altro che di contabilità 
in tutte le salse, paghe, eccetera. Un 
uso un po’ troppo limitato, anche se 
mi rendo conto che il mercato ha le 
sue esigenze. 

Trovo ottimo e ben assortito il con- 
tenuto del primo numero e per il futu- 
ro spero di trovare tanti “trucchi” ed 
utility. 

Massimo Politi 
Pescara 


È stufo di leggere di prezzi, beghe e 
nuove macchine? Anche queste cose 
contribuiscono a fare il “mondo dei 
personal”. 

È vero che, per chi desidera solo di- 
vertirsi ed imparare con la propria 
macchina, sono più interessati i 
“trucchi e le utility”. Ma il panorama 
editoriale dell'informatica è bello per- 
ché è vario. 

La nostra rivista non è migliore delle 
altre: è diversa. 


Spazio per il VIC 


Caro Personal Software, 

Finalmente sei arrivato. Penso che 
un po’ tutti ti stessimo aspettando. Io 
sono uno di quei poveri disgraziati che 
hanno comperato il Commodore VIC 
20 e si ritrovano senza poterlo usare 
nei modi dovuti in quanto non si trova- 
no istruzioni esplicative su questa mac- 
china. Ho comperato tutti i manuali 
che ho trovato sulla mia strada ma 
purtroppo solo uno è in italiano, sì, 
proprio quello pubblicato dalla Jack- 
son, la quale ha tra l’altro annunciato 
un secondo manuale che ancora non si 
è visto. Oltre a questo ho il VIC 20 
Programmers Reference Guide, pagato 
a peso d’oro, il quale in definitiva è 
appena superiore al “Jackson”. 

Infine ho il VIC Revealed che è il 
migliore, ma purtroppo in inglese, e io 
lo mastico poco, inoltre è pieno di er- 
rori di stampa, ed alcuni programmi 
non girano. 

Vedendo gli annunci sulle varie rivi- 


tl 


ste di parecchi possessori di VIC dispe- 
rati, ho scritto pure io e vi chiedo a 
nome di tutti i Vicpatiti di dare uno 
spazio anche a questo micro, con noti- 
zie più comprensibili di quelle pubbli- 
cate su Bit riguardo ai cambiamenti di 
indirizzi, nonché informazioni sui ma- 
nuali esistenti e sulle ditte italiane od 
estere che costruiscono periferiche per 
il VIC. 
Vittorio Godio 
Cesenatico 


Per quanto riguarda il software, la 
nostra rivista sta pubblicando program- 
mi adatti al VIC e lo farà anche in se- 
guito. Abbiamo in preparazione degli 
articoli sulle caratteristiche software del 
VIC, e sappiamo che qualche casa edi- 
trice ha in programma qualcosa su que- 
sta macchina. Daremo tempestivamente 
tutte le informazioni di cui verremo in 
possesso. Intanto, in questo numero, 
gli appassionati di VIC diano un’oc- 
chiata alla nuova rubrica “I segreti dei 
personal”. 


Per il Sinclair 


Gentile Redazione, 
ho acquistato con molta curiosità il 
primo numero della Vostra rivista, 


perché sono un principiante nel campo 
dell’informatica e posseggo da un paio 
di mesi un Sinclair ZX 80 con la nuova 
ROM. 

Ho quindi provato subito i due pro- 
grammi da Voi riportati per lo ZX 80: 
“Odissea nello spazio” e “Roulette 
russa”. Tengo a precisare che li ho ca- 
ricati tenendo presenti le opportune 
differenze dovute alla nuova ROM, 
come ad esempio per la funzione 
RND, ma purtroppo entrambi i pro- 
grammi erano troppo lunghi e non ci 
sono stati in memoria nemmeno sop- 
primendo tutte le istruzioni REM. 

Desidererei perciò che Voi mi spie- 
gaste gentilmente, a cosa è dovuto 
questo fatto. Colgo l’occasione per ri- 
volgervi una seconda domanda: come 
posso fare per scrivere l’apostrofo col 
mio ZX 80 con nuova ROM? 

Flavio Leoni 
Milano 


Lo ZX 81 (0 ZX 80 con nuova 
ROM) occupa più byte in memoria sia 
per le istruzioni che per i dati, e quindi 
un programma di 1 K per lo ZX 80 
non entra nello ZX 81 da 1 K. Le con- 
sigliamo di acquistare la RAM d’espan- 
sione. 

Per quanto riguarda l'apostrofo, non 
esiste sulla tastiera, e quindi va sostitui- 


to con qualche altro carattere, oppure 
va evitato. 


Per l’Olivetti 


Da alcuni mesi mi interesso di per- 
sonal computer e pertanto acquisto 
tutte le riviste del settore; più in là re- 
stringerò il campo a quelle che mag- 
giormente mi soddisferanno... 

Ho letto (e sto rileggendo) il n° 1 
della Vs rivista (benedetti Voi che spil- 
late le pagine anziché incollarle lungo 
il dorso!) e sono entusiasta del suo 
contenuto. Pur avendo fatto la mia 
scelta nello M20 della Olivetti (non an- 
cora in mio possesso) ho trovato nu- 
merose e preziose notizie, leggendo 
ogni Vostro articolo. 

A quando un “servizio” sullo M20? 

Pietro Gentile 
Napoli 


Siamo anche noi alla ricerca di buoni 
articoli e programmi per l’M20. In que- 
sto momento non vi è abbondanza in 
materia perché il numero di M20 non è 
ancora quello dei PET ed Apple. Con- 
tinui a leggere la nostra rivista: prima o 
poi troverà qualcosa di interessante per 
il suo computer, ma fin d’ora può tro- 
vare notizie, suggerimenti e tecniche ge- 
nerali che le sarà facile applicare 
all’M20. 


“DIGIT 2’ è ancora disponibile 


cod. 6011 | 


“DIGIT 2" è il libro che insegna 
l'elettronica digitale attraverso un 
approccio prettamente pratico alla 
materia. “DIGIT 2", infatti propone 
la realizzazione dei migliori 
progetti digitali a circuiti integrati 
sviluppati negli ultimi anni dalla 
rivista Elektor. 

Tutti i progetti sono pubblicati con 
disegni dei circuiti stampati e i 
relativi elenchi componenti. 

| circuiti che compongono il 
DIGIT 2 sono oltre 50, tutti molto 
interessanti, che spaziano dal 
frequenzimetro al generatore di 
onde sinusoidali-triangolari- 
rettangolari, fino all'impianto 
semaforico o alla pistola luminosa. 
Una serie di pratiche e divertenti 
realizzazioni, insomma, per 
arricchire il proprio laboratorio, la 
propria casa o, semplicemente per 
imparare l'elettronica digitale 
divertendosi 


1 copia del libro Digit 2 a L. 6.000 
1 copia del libro Digit 1 a L. 7.000 


SCONTO 20% 


agli abbonati 
fino al 28-2-83 


Chi fosse interessato a sviluppare anche le 
conoscenze teoriche e a sperimentarle, 
può richiedere alla JCE anche il DIGIT 1. 
Questo libro consente l'apprendimento 
passo-passo dei concetti di elettronica 
digitale grazie ad un originale metodo 
didattico basato sull'utilizzo di un'apposita 
e particolare basetta stampata fornibile a 
richiesta. 

cod. 2000 


Dove posso trovare un amplificatore 
operazionale quadruplo con tensione 
d'offset di 2mV? Quale sistema di sviluppo 
può supportare la CPU 8085?*Chi produce 
una RAM dinamica di 16 K con tempo di 
accesso inferiore a 300 mA? Che note di 
applicazione esistono per i convertitori A/D 
veloci? 

In che tipo di contenitore è presentato 

questo circuito integrato? 


+»... COnsultare semplicemente 


€C-Master 1982 


2 volumi - 11 sezioni - 3200 pagine - 6 aggiornamenti 


Circuiti digitali @ Tutti i parametri più 
Circuiti di interfaccia importanti Tagliando d'ordine da inviare a 
Circuiti lineari @ Elenco delle equivalenze GRUPPO EDITORIALE JACKSON s.r.l. - Via Rosellini, 12 - 20124 Milano 
Memorie Note di applicazione O Inviatemi una copia (due volumi + aggiornamenti) dell'IC-Master 1982 
Microprocessori 15.000 variazioni rispetto 
Schede per microcomputer all'edizione 1981 
Schede di memoria e di () Introduzione in 5 lingue: Cognome 
supporto per microcomputer inglese - tedesco - francese - 
(nuova sezione) spagnolo - giapponese Via . 
Circuiti integrati militari 160 costruttori di circuiti 
Circuiti integrati “custom” integrati È 
PROM (nuova sezione) @ indirizzi completi di © Allego assegno di L. 145.000 
@ Oltre 50.000 integrati produttori e distributori Non si effettuano spedizioni contro assegno - | versamenti possono 
a | leagicimamenti i ‘000 essere effettuati anche tramite vaglia postale o utilizzando il ccp n° 
Prezzo per entrambi i valu Goo i prin compresi): L. 145 11666203 intestato a Gruppo Editoriale Jackson - Milano (in questi casi 
(IVA e spese di spedizione . non possono specificare la causale del versamento) 
essere inviati separatamente. 


Nome . 


Codice Fiscale (per aziende) 


GRUPPO EDITORIALE JACKSON 
PUBBLICAZIONI 


Milano. 


TETTE E eee 
IBRI S5RSoNeL Hi 
SOFTWARE 


L 


Ti 


- 20124 


DI 


Jackson Via Rosell 


v 
9 
s 
B 
| 
© 
2 
2 
È 
5 
Ci 
E 
3 
H 
A 
ò 
SS 
5 
Oi 
3 
S 
È 
ia 
3 
3 
3 
î 


Gruppo Edit 


Milano. 


Pr 


FS 


PERSONAL 
SOFTWARE 


LIBRI 


Nome Cognome 


a 
A NNO NE N cs O (ve 
® 
FA = 
è 
6 È 
Li i s 
2 è 
5 Iii 
— ai n + 
È 3g 
ui HH E © 5 
HI 
8 Chul 
È 
RI 
2 
8 
Gai 
la di 
xe iI 
i |8e 
q 8 |s8S) | | 
oi |__| 
è 
è = 
$ E 
Pr [I Ei 
DI (a 
* È) 
Ri i 1 
Hi 5 ® 
e 2 S 
3 3 
5] 
i È 8 1 
H = Dl 
s| 2 
È ° 5 
s e £ i 
È Fi 9 
E s o 
£ 5 80 Sf|ò 
E ° p ag pos|OL Li 
Si S| 2 Ss 89 
E è - 25 Ze 
Gila è È SI ol|sg 
RI s £o Dogs 
i: Ri s x d (o | 
È ella 2 s De Se Us 
s s Li 3 > c© «© -_ 
= 5 SLLE S Ja [e] 
wu O e 1 E ES EE E n 
LITI TT 
A 
E 
H 
è 
se 
53 
ci 


+ L. 1.500 per contributo fisso spese 


di. L. 


Indirizzo 


(in questo caso la spedizione è gratuita) 


di spedizione 


Cap. 


Inviatemi i seguenti libri 


Codice Fiscale (indispensabile per le aziende ) 


© Pagherò al postino l'importo di L 


© Allego assegno n° 


È 
s 
E 
(ci 


Codice 
Libro 


Quantità 


Codice 
Libro 


quantità | 


Codice 
Libro 


Firma... 


D Abbonato Data 


D Non abbonato 


Firma 


O Abbonato Data 


| 
(Es 


O Non abbonato 


are versamenti anche sul ccp n° 11666203 intestato a: Gruppo Editoriale 
i, 12 - 20124 Milano. In questo caso specificare nell'apposito spazio sul 


modulo di ccp la causale del versamento e non inviare questo tagliando 


i SS SS 


2 
© 
a 
5 
5 
d 
RI 
a 
wu 
vd 
z 


Jackson - via Roselli 


are nell'apposito spazi 


iando. 


cp la cai 


- Via Rosel 
“E SS E ME 5 5 E 5 = 


modulo di ‘ci 


I 
I 
be 


a 
2 
RI 
2 
2 
ò 
E 
° 
i 
5 
8 
E 
a 
8 
S 
3 
$ 
8 
z 
s 
8 
8 
3 
° 
2 
5 
2 
5 
5 
È 
5 
z 
2 
È 
è 
5 
g 
te] 
5 
g 
8 
3 
w 
a 
& 


Jackson 


UNA PUBBLICAZIONE 
DEL GRUPPO EDITORIALE JACKSON 


© 


= =——ciee—a===i= 
== RAEE =lSoi 


ANNO1. N.3 DICEMBRE 1982 L. 3.500 


DIRETTORE RESPONSABILE: Giampietro Zanga 
DIRETTORE: Mauro Boscarol 


HANNO COLLABORATO A QUESTO NUMERO: 

P. Dell'orco, A. Giovannetti, G. Williams, R. Baker, 
W. Douglas Maurer, J.S. Browning, C. Sintini, 

P. Canevarolo, N. Tonolli, G. Staluppi, Lexikon 
Copertina: M. Elisa Rizzo 

Grafica e Impaginazione: Fernanda Arzenton 
Fotocomposizione: Composizioni Grafiche - Padova 
Traduzioni: F. Santini, R. Pevarolo 


CONTABILITA Franco Mancini, Roberto Ostelli, 
Mariella Luciano, Franca Anelli, Sandra Cicuta, 
Gabriella Napoli 


DIFFUSIONE E ABBONAMENTI: Luigi De Cao, 
Adela Bel Lozano, Ombretta Giannetto 


AUTORIZZAZIONE ALLA PUBBLICAZIONE: Tribunale 
di Milano n. 69 del 20/2/1982 


PUBBLICITA': Concessionario per l'Italia e l'Estero 
Reina s.r.]. Via Washington, 50 - 20146 Milano 

Tel. (02) 4988066/7/8/9/060 (5 linee r.a.) 

Telex 316213 REINA | 


STAMPA: Arti Grafiche “La Cittadella” S.p.a 
Pieve del Cairo (PV) 


Concessionario esclusivo per la DIFFUSIONE in Italia 
e all'Estero: 
SODIP - Via Zuretti, 25 - 20125 Milano } 


Spedizione in abbonamento Postale Gruppo IlI/70 
Prezzo della rivista L. 3,500. Numero arretrato L. 6.000. 
Abbonamento annuo (10 numeri) L. 28.000: per l'Estero 
L. 42.000 

| versamenti vanno indirizzati a: Gruppo Editoriale Jackson 
Via Rosellini, 12 - 20124 Milano - mediante emissione di 
assegno bancario, cartolina vaglia o utilizzando il c/c 
Postale numero 11666203. 

Per i cambi di indirizzo, indicare, oltre naturalmente al 
nuovo, anche l'indirizzo precedente, ed allegare alla 
comunicazione l'importo di L. 500, anche in francobolli 


© TUTTI | DIRITTI DI RIPRODUZIONE O TRADUZIONE 
DEGLI ARTICOLI PUBBLICATI SONO RISERVATI 


9 


GRUPPO EDITORIALE JACKSON Srl 

DIREZIONE, REDAZIONE, AMMINISTRAZIONE: 

Via Rosellini, 12 - 20124 Milano - Telefoni: 68.03.68 - 68.00.54 
SEDE LEGALE: Via Vincenzo Monti, 15 - 20123 Milano 
REDAZIONE USA: GEJ Publishing Group Inc. - 811 Haverhill | 
Drive - 90407 Sunnyvale CA - Tel. (408) 7730103 


DIREZIONE EDITORIALE: Giampietro Zanga e Paolo Reina 
COORDINAMENTO EDITORIALE: Daniele Comboni 


È ne aaa tor. 
tel 152 a e 
Patt 

riali 


LA PRIMA RIVISTA DI. V 


LIMITA HAL Mi N sa o 
IT PREZZI E LE NOVITA 

| ANTEPRIMA "TRON... 

| ULTIMO DISNEY nu 


I TRUCCHI DEI CAMPIONI to 


» 
ma," *RORIBARA SI Riad RR Un Ai fo 


GIOCHIAMO CON I COMPUTER y, 


te, 


o Qt ti i 
Sì ei 


. Appl 
continua a f Vcrescere. 


TO 


Response 


Apple ha introdotto il concetto di personal in tutto il mondo. E in tutto il mondo 
Apple cresce. Cresce anche in Italia dove la Iret, che lo importa e ne cura 
l'assistenza, può oggi annunciare l’esistenza di una rete di vendita di oltre 300 
centri specializzati che fanno di Apple il loro cavallo di battaglia. 

E naturalmente crescono le vendite di Apple, perché il personal computing 
conquista piccole aziende, professionisti e privati. È facile prevedere quindi che 
Apple continuerà a crescere, anche perché l’unica cosa di Apple che non 
cresce sono i prezzi. (Chiedete l'offerta speciale ai nostri rivenditori). 
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